Computer 


M.9LCK 

DAVID  W,  TAYLOR  NAVAL  SHIP 
RESEARCH  AND  DEVELOPMENT  CENTER 

Bethtsda,  Maryland  20084 


COMPUTER  CENTER 

CDC  LIBRARIES/PROCFIL  (PROCEDURES) 


David  V.  Sommer 


<<& 


^  * 


APPROVED  FOR  PUBLIC  RELEASE:  DISTRIBUTION  UNLIMITED 


Computation,  Mathematics  and  Logistics  Dei  srtment 
Departmental  Report 


February  1981 


CMLD-81 -08 


1  f  ■'s 


1  O 

X  o 


NOWDTNSROC  5602/30  080! 
{supersedes  3960/46) 


MAJOR  DTNSRDC  ORGANIZATIONAL  COMPONENTS 


NIIW  DINSKIK'  3960/43  (Rev.  3-78) 


SECURITY  CLASSIFICATION  of  This  PAGE  (When  Dmim  Enl.fd) _ 

REPORT  DOCUMENTATION  PAGE  BEFORfcoMPLE^S^’ 

I.  REPORT  NUMBER  b.  GOVT  ACCESSION  NO.  3.  RECIPIENT’S  CATALOG  NUMBER 


I.  REPORT  NUMBER 

CMLD-81-08 

4.  TITLE  (and  Subtitle) 


'J )~-A'/d3  ^5- 


i  Computer  Center  CDC  Li braries/PROCFI L 
^  (Procedures)  . 


S.  TYPE  OF  REPORT  *  PERIOD  COVERED 


V  Final 


6.  PERFORMING  ORG.  REPORT  NUMBER 


David  V. 'Sommer 


8.  CONTRACT  OR  GRANT  NUMBERf*J 


19.  PERFORMING  ORGANIZATION  NAME  and  ADDRESS 


David  Taylor  Naval  Ship  Research  £  Development 
Center,  User  Services,  Code  1892 
Bethesda,  Maryland  20084 


1 1  I  CONTROLLING  OFF.CE  NAME  AND  ADDRESS 


10.  PROGRAM  ELEMENT.  PROJECT.  TASK 
AREA  8  WORK  UNIT  NUMBERS 


'  J  I  -  -f 

/  l  J  I 


1Z  RE  PORT. DATE 


Computation,  Mathematics  £  Logistics  Department  ■;}  February  T98l _ ___ 

Computer  Facilities  Division  ( 1 89)  V_#*3.-NUMBeRT>p-PAoEs 

_ _ _ m _ _ _ 

I A  MONITORING  AGENCY  NAME  «  AODRESStT  dllletmt  It'in  Controlling  Olhct)  'S  SECURITY  CLASS,  fof  ihl*  report) 


SI 


j 1  i  •  .' 


Unclassified 


is*.  DECL  ASSI  FI  CATION/ DOWNGRADING 
SCHEDULE 


16  DISTRIBUTION  STATEMENT  fotihls  Report) 


APPROVED  FOR  PUBLIC  RELEASE:  DISTRIBUTION  UNLIMITED 


17  DISTRIBUTION  STATEMENT  (o f  the  abstract  entered  In  Block  20,  if  different  from  Report) 


*9-  KEv  WORDS  fCortlnue  on  reverse  aide  if  necessary  anti  Identify  by  block  number) 


Computer  Programs,  Computers,  Control  Cards,  Functional  Categories, 
Library  File,  Software  Documentation 


20  ,  ASST  ft  ACT  ( Continue  on  reverse  aide  If  f>eeef  aery  and  Identify  by  block  ntual  *t) 

''^Computer  Center  CDC  Libraries/PROCFIL  (Procedures),  CLIB/P,  is  a 

reference  manual  which  described  all  of  the  catalogued  procedures  (sets  of 
control  cards  to  accomplish  a  task)  in  1  ibrary'^PROCFiL.'^.on  the  CDC  6000/ 
Cyber  7  4  computers  at  DTN^RDC.  These  procedures  include  document ''source 
program/procedure  file  maintenance,  program  compi 1 at:  I  on/ loading/execution, 
permanent  file  audit/rename,  special  copy  functions.  CLIB/P  lists  the 
procedures  by  functional  category  and  alphabetically  with  a  descriptive  title 
All  machine-readable  documents  detailing  the  use  of  these  procedures  are  ine 


r  \jr%m 

l  JAN  73 


EDITION  OF  1  NOV  FS  IS  OBSOl  ETE 
S/S  010  2-014-6601 


<■  J.  £  k'1 


SECURITY  CLASSIFICATION  OF  THIS  PAGE  f fNn  D«l*  tewi,) 


ded 


*********************************************************************** 


DAVID  W.  TAYLOR 

NAVAL  SHIP  RESEARCH  AND  DEVELOPMENT  CENTER 
BETHESDA,  MARYLAND  20084 


**  ********************************************* 


*  * 

*  * 

-  COMPUTER  CENTER  * 

*  CDC  LIBRARIES  /  PROCF1L  * 

*  i PROCEDURES  I  * 

4  * 

*  * 


**  *  *  *  4  4.  4:  4  *  *  4  -  **:***  *  * .4  *  4  *  *  *  4:  *  4  *  *  * 4-  4  *  *  *  *  *  *  *  *  4 -  *  4  *  *  * 


4*************** *******  ak  31  *k*3f3i,*4k*4  4  4  *****  ****  4  4  4:  4***********:********** 


BY 

DAVID  V  SOMMER 

USER  SERVICES  BRANCH 
CODE  1892 


Accession  For 

NTIS  GTJA&I 
DTTC  T.’.B 
Unannounced 


Justification. 


By. _ _ _ _ 

Distribution/ 


COMPUTATION, 


MATHEMATICS  AND 
DEPARTMENTAL 


LOGISTICS  DEPARTMENT 
REPORT 


FEBRUARY  1981 


CMLD-81-08 


THROUGH  REVISION  0  I  FEB 


1 98 1  i 


□  □ 


FEB  1981 


TABLE  OF  CONTENTS 


1  INTRODUCTION 

HOW  TO  USE  THIS  MANUAL  1-1 
LIBRARY  PROCFIL  1-1 
EXECUTING  A  PROCEDURE  1-1 
FUNCTIONAL  CATEGORIES  1-2 
LIST  OF  PROGRAMS  BY  CATEGORY  1-5 
DESCRIPTIVE  TITLES  1-7 


2  PROGRAM  DOCUMENTATION 

HOW  TO  PRINT  A  DOCUMENT  2-1 

< INDIVIDUAL  DOCUMENTS 

ARRANGED  ALPHABETICALL Y>  2-2  * 


*  -  A  LISTING  OF  THE  DOCUMENTS  IS  NOT  INCLUDED  IN  THIS  TABLE  OF 
CONTENTS  (SEE  PAGE  1-?».  AS  NEW  ROUTINES  ARE  DEVELOPED,  THEY  WILL 
BE  INSERTED  ALPHABETICALLY  INTO  THIS  DOCUMENT  AND  MAY  BE  PRINTED  ON 
THE  COMPUTER. 


. . 


FEB  1981 


CDC  6000 


PAGE  1-1 


*****  INTRODUCTION  *****  jj 

THE  COMPUTER  CENTER  MAKES  AVAILABLE  ON  THE  CDC  COMPUTERS,  IN  I 
ADDITION  TO  THE  NOS/BE  OPERATING  SYSTEM,  A  WIDE  VARIETY  OF  BOTH  l 
SCIENTIFIC  AND  UTILITY  PROGRAMS,  SUBPROGRAMS  AND  CATALOGUED  PROCEDURES.  1 
MOST  OF  THE  ROUTINES  ARE  MAINTAINED  IN  LIBRARIES  ON  PERMANENT  FILES  AND 
MAY  BE  INVOKED  BY  THE  APPROPRIATE  (LOADER)  CONTROL  CARDS.  A  FEW 
PROGRAMS  ARE  AVAILABLE  AS  INDEPENDENT  PERMANENT  FILES.  j 

THE  CLI8-SERIES  OF  MANUALS  CONSI5TS  OF  THE  FOLLOWING.  WHICH  % 
DESCRIBE  THE  CONTENTS  OF  THE  VARIOUS  CDC  6000  LIBRARIES  MAINTAINED  BY  f 
THE  COMPUTER  CENTER: 

CL  IB  -  COMPUTER  CENTER  CDC  LIBRARIES 

CLI6/N  -  COMPUTER  CENTER  CDC  LIBRARIES/NSRDC 
(SUBPROGRAMS) 

CLIB/'P  -  COMPUTER  CENTER  CDC  LIBRARIES/PROCF1L 
( PROCEDURES f 

CLIB/U  -  COMPUTER  CENTER  CDC  LIBRARIES/UTILITY 
I  PROGRAMS 1 

CL  IB/M  -  COMPUTER  CENTER  CDC  L1BRARIES/MNSRDC 
(PROGRAMS! 

THIS  MANUAL,  CLIB/P,  IS  A  REFERENCE  MANUAL  WHICH  DESCRIBES  MOST  OF 
CATALOGUED  PROCEDURES  IN  LIBRARY  'PROCFIL'. 


CMLD-81-06  I 
Cr.V  D-B1-07  I 
CMLD-81-08  j 
CMLD-81-09  1 


***  HOW  TO  USE  THIS  MANUAL  **« 


THE  PROCEDURES  ARE  CLASSIFIED  IN  ONE  OR  MORE  FUNCTIONAL  CATEGORIES 
(SEE  PAGE  1-2  FOR  A  LIST  OF  CATEGORIES).  THEY  ARE  LISTED.  BEGINNING  ON 
PAGE  1-5.  UNDER  THE  VARIOUS  CATEGORIES.  THE  INDIVIDUAL  PROCEDURES  ARE 
LISTED,  WITH  DESCRIPTIVE  TITLE.  BEGINNING  ON  PAGE  1-7.  CHAPTER  2 
CONTAINS  ALL  CURRENTLY  AVAILABLE  MACHINE-READABLE  DOCUMENTS  DESCRIBING 
THE  USE  OF  PROCEDURES  IN  LIBRARY  'PROCFIL'. 


***  LIBRARY  PROCFIL  *** 

A  CATALOGUED  PROCEDURE  IS  A  SET  OF  CONTROL  CARDS  WHICH  ACCOMPLISH  A 
TASK.  LIBRARY  'PROCFIL'  CONTAINS  MANY  DTNSRDC  WRITTEN  AND/OR  SUPPORTED 
PROCEDURES. 


***  EXECUTING  A  PRODECURE  *** 

MOST  OF  THE  PROCEDURES  MAY  BE  EXECUTED  BY: 

BEGIN. <PROCNAME> , . <PARAMETERS> . 

THE  INDIVIDUAL  DOCUMENTS  DESCRIBE  THE  <PARAMETERS> ,  IF  ANY.  AND  THE 
METHOD  OF  EXECUTION. 
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***  FUNCTIONAL  CATEGORIES  *** 

THE  FOLLOWING  FUNCTIONAL  CATEGORIES  ARE  USED  AT  DTNSRDC.  THOSE 
CATEGORIES  PRECEDED  BY  AN  ASTERISK  (*)  ARE  LOCAL  DTNSRDC  CATEGORIES. 
THE  OTHER  ARE  FROM  THE  VIM  (CDC  USERS  GROUP)  LIST. 


AO  ARITHMETIC  ROUTINES 
At  REAL  NUMBERS 
A2  COMPLEX  NUMBERS 
A3  DECIMAL 
A 4  I/O  ROUTINES 

BO  ELEMENTARY  FUNCTIONS 
B 1  TRIGONOMETRIC 
B2  HYPERBOLIC 

B3  EXPONENTIAL  AND  LOGARITHMIC 
B4  ROOTS  AND  POWERS 


CO  POLYNOMIALS  AND  SPECIAL  FUNCTIONS 
Cl  EVALUATION  OF  POLYNOMIALS 
C2  ROOTS  OF  POLYNOMIALS 

C3  EVALUATION  OF  SPECIAL  FUNCTIONS  SNON-STATISTICAL '• 

C4  SIMULTANEOUS  NON-LINEAR  ALGEBRAIC  EQUATIONS 
CS  SIMULTANEOUS  TRANSCENDENTAL  EQUATIONS 

*  C6  ROOTS  OF  FUNCTIONS  { 

€ 

DO  OPERATIONS  ON  FUNCTIONS  AND  SOLUTIONS  OF  DIFFERENTIAL  EQUATIONS 
Dl  NUMERICAL  INTEGRATION 

D2  NUMERICAL  SOLUTIONS  OF  ORDINARY  DIFFERENTIAL  EQUATIONS 
D3  NUMERICAL  SOLUTIONS  OF  PARTIAL  DIFFERENTIAL  EQUATIONS 
D4  NUMERICAL  DIFFERENTIATION 


EC 
£  1 
r  a 

Ct 

r  A 


INTERPOLATION  AND  APPROXIMATIONS 
TABLE  LOOK-UP  AND  interpolation 
CURVE  FITTING 


SMOOTHING 

MINIMIZING  OR  MAXIMIZING  A  FUNCT 


ON 


FO  OPERATIONS  ON  MATRICES.  VECTORS 
FI  VECTOR  AND  MATRIX  OPERATIONS 
F2  EIGENVALUES  AND  EIGENVECTORS 
F3  DETERMINANTS 


F 4  SIMULTANEOUS  LINEAR  EQUATIONS 


SIMULTANEOUS  LINEAR  EQUATIONS 


GO  STATISTICAL  ANALYSIS  AND  PROBABILITY 

Gi  DATA  REDUCTION  (COMMON  STATISTICAL  PARAMETERS) 

G2  CORRELATION  AND  REGRESSION  ANALYSIS 
G3  SEQUENTIAL  ANALYSIS 
G4  ANALYSIS  OF  VARIANCE 
G5  TIME  SERIES 

66  SPECIAL  FUNCTIONS  (INCLUDES  RANDOM  NUMBERS  AND  PDF'S) 

*  G7  MULTIVARIATE  ANALYSIS  AND  SCALE  STATISTICS 

*  68  NON-PARAMETRIC  METHODS  AND  STATISTICAL  TESTS 

*  G9  STATISTICAL  INFERENCE 
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HO  OPERATIONS  RESEARCH  TECHNIQUES,  SIMULATION  &  MANAGEMENT  SCIENCE 

HI  LINEAR  PROGRAMMING 

H2  NON-LINEAR  PROGRAMMING 

H3  TRANSPORTATION  AND  NETWORK  CODES 

HA  SIMULATION  MODELING 

H5  SIMULATION  MODELS 

H6  CRITICAL  PATH  PROGRAMS 

H8  AUXILIARY  PROGRAMS 

H9  COMBINED 

10  INPUT 

11  BINARY 

12  OCTAL 

13  DECIMAL 

14  BCD  (HOLLERITH'S 
19  COMPOSITE 

JO  OUTPUT 
J1  BINARY 
J2  OCTAL 
J3  DECIMAL 
J4  BCD  (HOLLERITH* 

J5  PLOTTING 
J7  ANALOG 
J9  COMPOSITE 

KO  INTERNAL  INFORMATION  TRANSFER 
K 1  EXTERNAL -TO* EXTERNAL 
K2  1NTERNAL-T0- INTERNAL  (RELOCATION) 

K3  DISK 
K4  TAPE 

K5  DIRECT  DATA  DEVICES 

LO  EXECUTIVE  ROUTINES 
LI  ASSEMBLY 
12  COMPILING 
L3  MONITORING 

14  PREPROCESSING 

15  DISASSEMBLY  AND  DERELATI V1Z1NG 
L6  RELATIV1ZING 

17  COMPUTER  LANGUAGE  TRANSLATORS 


MO  DATA  HANDLING 
Ml  SORTING 

M2  CONVERSION  AND/OR  SCALING 
M3  MERGING 

M4  CHARACTER  MANIPULATION 
M5  SEARCHING,  SEEKING,  LOCATING 
M6  REPORT  GENERATORS 
M9  COMPOS1 TE 

NO  DEBUGGING 
N 1  TRACING  AND  TRAPPING 
N2  DUMPING 

N3  MEMORY  VERIFICATION  AND  SEARCHING 
N4  BREAKPOINT  PRINTING 
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00 

01 

03 

04 

05 

09 


SIMULATION  OF  COMPUTERS  AND  DATA  PROCESSORS  (INTERPRETERS) 
OFF-LINE  EQUIPMENT  (LISTERS,  REPRODUCERS,  ETC,) 

COMPUTERS 

PSEUDO-COMPUTERS 

SOFTWARE  SIMULATION  OF  PERIPHERALS 
COMPOSITE 


PO  DIAGNOSTICS  (HARDWARE  MALFUNCTION) 


QO  SERVICE  OR  HOUSEKEEPING.  PROGRAMMING  AIDS 
Q1  ClEAR/RESET 

02  CHECKSUM  ACCUMULATION  AND  CORRECTION 

03  REWIND.  TAPE  MARK.  LOAD  CARDS,  LOAD  TAPE  PROGRAMS.  ETC. 

04  INTERNAL  HOUSEKEEPING.  SAVE.  RESTORE.  ETC. 

05  REPORT  GENERATOR  SUBROUTINES 

06  PROGRAM  DOCUMENTATION:  FLOW  CHARTS.  DOCUMENT.  STANDARDIZATION 
07  PROGRAM  LIBRARY  UTILITIES 


RO  LOGIC  AND  SYMBOLIC 
k 1  FORMAL  LOGIC 
R2  SYMBOL  MANIPULATION 
R3  LIST  AND  STRING  PROCESSING 
R4  TEXT  EDITING 

SO  INFORMATION  RETRIEVAL 


TO  APPLICATIONS  AND  APPLICATION-ORIENTED  PROGRAMS 
T 1  PHYSICS  (INCLUDING  NUCLEAR) 

T2  CHEMISTRY 

T3  OTHER  PHYSICAL  SCIENCES  (GEOLOGY.  ASTRONOMY.  ETC.) 

T  4  ENGINEERING 
T5  BUSINESS  DATA  PROCESSING 

T6  MANUFACTURING  (NON-DATA)  PROCESSING  AND  PROCESS  CONTROL 
T7  MATHEMATICS  AND  APPLIED  MATHEMATICS 
T8  SOCIAL  AND  BEHAVIORAL  SCIENCES  AND  PSYCHOLOGY 
T9  BIOLOGICAL  SCIENCES 

T 1 0  REGIONAL  SCIENCES  (GEOGRAPHY.  URBAN  PLANNING) 

Til  COMPUTER  ASSISTED  INSTRUCTION 

UO  LINGUISTICS  AND  LANGUAGES 


VO  GENERAL  PURPOSE  UTILITY  SUBROUTINES 
VI  RANDOM  NUMBER  GENERATORS 

V2  COMBINATORIAL  GENERATORS:  PERMUTATIONS,  COMBINATIONS  &  SUBSETS 
*  V3  STANDARD  AND  SPECIAL  PROBLEMS 

XO  DATA  REDUCTION 

XI  RE-FORMATTING.  DECOMMUTATION.  ERROR  DIAGNOSIS 
X2  EDITING 
X3  CALIBRATION 
X4  EVALUATION 

X5  ANALYSIS  (TIME-SERIES  ANALYSIS* 

X6  SIMULATION  {GENERATE  TEST  DATA  FOR  DATA  REDUCTION  SYSTEM) 

YO  INSTALLATION  MODIFICATION 

T 1  INSTALLATION  MODIFICATION  LIBRARY 

Y2  NEWPL  TAPE  OF  INSTALLATION  MODIFICATIONS 


ZO  ALL  OTHERS 


,v*v ' 
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***  LIST  OF  PROCEDURES  BY  CATEGORY  *** 


THE  PUBLIC-ACCESS  PROCEDURES  ARE  LISTED  BELOW  UNDER  THEIR 
FUNCTIONAL  CATEGORIES.  AN  ALPHABETICAL  LIST,  WITH  A  BRIEF  DESCRIPTION 
OF  EACH  PROCEDURE  BEGINS  ON  PAGE  1-7. 

J1  BINARY 

CV029 

J4  BCD  (HOLLERITH! 

BANNERS  LINES  PH 

COMQ  LINES 

J5  PLOTTING 
CALC3D 


K 1  external -tg-external 


CGPYS 

RECADDl 

RECGET1 

PFTRAN1 

RECDEL1 

RECREP1 

K3 

DISK 

CGPYLIB 

UPDADD 

UPDGETT 

PR0S2R 

UPDDELE 

UPDREPL 

SELDUMP 

UPD6ET 

TRANP&K 

UPDGETS 

K4 

TAPE 

B7700S 

COPYBLK 

B77G0U 

SELLOAD 

LO 

EXECUTIVE  ROUTINES 

ANYLIB 

LIBPROA 

NOGO 

ANY PRO 

LIBSET1 

PROGRAM 

ANY PROS 

L1BSET2 

SEGLD 

BIGLOAD 

MNSRDC 

S2K260 

DISPOST 

MY  PRO 

utility 

LIBPRO 

MY PROS 

1  ft 

L<£ 

COMPILING 

RUNBAS 

RUNMNf 

RUHSEQ 

RUNFTN 

RUNPAS 

RUNTS 

Ml 

SORTING 

AUDIT 

SORT 

SORTCZ 

M2 

CONVERSION  AND/OR 

SCALING 

BR2CCL 

CV029 

f|  n 

M  i 

OFF-LINE  EQUIPMENT 

( LISTERS.  REPRODUCERS. 

ETC.  * 

CV029 

MANUAL 

RECDOC 

DOCDATE 

proall 

TIDBITS 

DOCDOC 

PRODOC 

UPDDOC 

LIST 

PROUST 

UPDLIST 
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ft  O 
**3 


F 1 ! 


X  L 


AUDIT 

COMO 

BANNERS 

GET PROD 

BDT 

MFX 

E  MANIPULATION 

ANYLIB 

LIBPROA 

ANYPRO 

LIBSET1 

ANY PROS 

LIBSET2 

BIGLOAD 

MNSRDC 

DISPOST 

MYPRO 

LIBPRO 

MY PROS 

I NTERNAL 
ADDEX 
PAC 
PAHC 


-1C  PI 

-  I  «  i,  . 


nU. 


SAVE.  RESTORE. 
PFRSTOR 
PHC 
PLC 

PURGALL 


ETC. 


NORERUN 

SEND 

WHA7L1B 


NOGD 

PROGRAM 

SEGLD 

S2K260 

UPDLIST 

utility 


PURGE N 
RENAMAC 
SELDUttP 
SELLOAD 


06 

PROGRAM  DOCUMENTATION: 

FLOW  CHAi 

DOCADD 

DOCGET 

DOCDELE 

DOCLIST 

docfile 

DOCREPL 

07 

PROGRAM  LIBRARY  UTIL  IT 

IES 

COPYL3B 

PRONAM 

PROADD 

PROREPL 

PRODELE 

PROS2R 

PROGET 

UPDADD 

PKOriDR 

UPDDELE 

SO 

INFORMATION  RETRIEVAl 

AUDIT 

GRIPE 

DOCUMENT  STANDARDIZATION 
DOCTAPt 
LGOTREE 
PGMTAPE 


UPDGET 
UPDGETS 
UPDGET T 
UPDREPt 


iilL.L.,,,! . . . . rMlUlllllllllllllliililiiMiniiiillyliiiiiillihiti^ 
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**»  DESCRIPTIVE  TITLES  *** 

THE  PUBLIC-ACCESS  PROCEDURES  ARE  LISTED  ALPHABETICALLY  BELOW. 

DDE XT  MODIFY  PRIVATE  PACK  DUM  FILE  FOR  LEVEL  508  DUMPF/LOADPF 

NYLIB  EXECUTE  A  PROGRAM  ON  ANY  EDITLIB  USER  LIBRARY 

NYPRO  EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  RANDOM  PROCEDURE  FILE 


ANYLIB 
ANY PRO 
ANYPROS 


DlULLiau 


BR2CCL 


B7700S 

B7700U 


EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  SEQUENTIAL  PROCEDURE 

FILE 

SORTED  USER  AUDIT 

PRINT  A  PAGE  WITH  1  TO  8  BANNERS 

PRINT  A  BANNER  PAGE  WITH  DATE  AND  TIME 

CREATE  an  ABSOLUTE  FILE  WHICH  WILL  ALLOW  SOME  LARGE  PROGRAMS 
TO  LOAD  IN  LESS  CORE  THAN  NORMALLY  NEEDED  * 

CONVERT  SEQUENTIAL  ■ UNIVERSITY  OF  WASHINGTON)  BEGIN/REVERT 
PROCEDURE  FILE  TO  SEQUENTIAL  iCDC-SUPPORTED)  CYBER  CONTROL 
LANGUAGE  FILE  AND.  OPTIONALLY.  CATALOG  THE  CCL  FILE 

PREPARE  9-TRACK  EBCDIC  TAPE  TO  MOVE  A  SINGLE  CARD-IMAGE 
PERMANENT  FILE  FROM  THE  CDC  6000  TO  THE  BURROUGHS  B7700 

PREPARE  9-TRACK  EBCDIC  TAPE  TO  MOVE  A  SINGLE  DECK  OR  ALL 
DECKS  IN  AN  UPDATE  LIBRARY  FROM- THE  CDC  6000  TO  THE  BURROUGHS 

B7700 

THREE-D  PROCEDURE  FOR  CALCOMP  PLOTTERS 

PRINT  A  COMPUTER  CENTER  NOTE  OR  THE  CCN  INDEX 

PREPARE  AND  ROUTE  A  FILE  TO  THE  MICROFICHE  QUEUE 

REBLOCK  STRANGER  TAPES  TO  SCOPE  STANDARD  FILES  <80TH 
UNBLOCKED  CARD  AND  PRINT  LINE  IMAGE  TAPES  AND  BLOCKED 
STRANGER  TAPES) 

CONDENSE  i AND  SORT}  AN  EDITLIB  USER  LIBRARY  PRESERVING  al, 
Fl.  FLO  VALUES.  B INDEX  AND  LISTBIN  LISTS  ARE  PROVIDED. 

ATTACH,  EXECUTE  AND  RETURN  THE  RIQSCOPYS  PROGRAM 


Cvu^iS 

CONVERT  TO  029  PUNCH 

CODE 

* 

OISPOST 

INVOKE  THE  TEKTRONIX 

POSTPROCESSOR 

1 

DOCADD 

ADD  ONE  DOCUMENT  TO  t 

A  DOCUMENTATION  FILE 

LIST  DOCUMENT  NAMES  (ON  -DECK  CARDS)  TOGETHER  WITH  THE 
DOCUMENT  DATE  AND  PAGE  NUMBERS  (FROM  BOTTOM  LINE  OF  EACH 

I*  i.  a 

- 
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DOCDELE  DELETE  ONE  DOCUMENT  FROM  A  DOCUMENTATION  FILE 

DOCDOC  LIST  DOCUMENTATION  FOR  PROCEDURES  DOCADD,  DOCDATE ,  DOCDELE, 
DOCDOC,  DOCFILE,  DOCGET ,  DOCLIST,  DOCREPL 

DOCFILE  ATTACH  A  DOCUMENTATION  FILE 

DOCGET  GET  (EXTRACT)  SPECIFIED  DOCUMENT  FROM  A  DOCUMENTATION  FILE 

DOCLIST  LIST  DOCUMENT  NAMES  (ON  *DECK )  CARDS  IN  A  DOCUMENTATION  FILE 

DOCREPL  REPLACE  ONE  DOCUMENT  IN  A  DOCUMENTATION  FILE 

DOCTAPE  EXTRACT  (PRINT)  ONE  OR  ALL  DOCUMENTS  FROM  A  DOCUMENT  FILE  ON 

TAPE 

GETPROD  GET  PRODUCTS  FILE(S)  FOR  NOS/BE  LEVELS  461,  439,  434,  420, 
414,  410,  406,  401,  380 

GRIPE  ALLOW  USER  TO  MAKE  GRIPES  OR  SUGGESTIONS  DIRECTLY  TO  THE 
COMPUTER  . 

LGOTREE  GENERATE  CROSS-REFERENCE  LISTS  AND  TREE  STRUCTURE  FROM  BINARY 
RELOCATABLE  OBJECT  FILE 

LIBPRO  EXECUTE  A  PROCEDURE  ON  LIBRARY  'PROCFIL'  CATALOGED  UNDER  ANY 
ID 

L1BPROA  EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  PROCEDURE  LIBRARY 
LIBSET1  CREATE  SIMPLE  ABSOLUTE  USING  ONE  ED1TLIB  LIBRARY 

LIBSET2  CREATE  SIMPLE  ABSOLUTE  USING  TWO  ED1TLIB  LIBRARIES 

LINE6  SET  PRINT  FILE  TO  6  LINES  PER  INCH 

LINE8  SET  PRINT  FILE  TO  8  LINES  PER  INCH 

LIST  LIST  A  PERMANENT  FILE 

MANUAL  PRINT  ONE  COPY  OF  A  MANUAL  OR  ITS  REVISION  PAGES 

MFX  TELL  INTERACTIVE  USER  WHICH  MAINFRAME  HE  IS  USING 

MNSRDC  EXECjTE  A  PROGRAM  ON  EDITL3B  USER  LIBRARY  ' MNSRDC' 

MYPRO  EXECUTE  A  PROCEDURE  ON  SEQUENTIAL  FILE  'PROCFIL'  CATALOGED 

UNDER  ANY  ID 

MYPROS  EXECUTE  A  PROCEDURE  ON  SEQUENTIAL  FILE  'PROCFILS'  CATALOGED 

UNDER  ANY  ID 

NOGO  CREATE  SIMPLE  ABSOLUTE  FROM  RELOCATABLE 

NORERUN  INS  'RE  THAT  A  BATCH  JOB  CANNOT  BE  RERUN  BY  OPERATOR  TYPE-IN 
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PAC 

PAHC 

PALC 

PFRSTOR 

PFTRAN1 

PGMTAPE 

PHC 

PLC 

PM 

PROADD 

PROALl 

PRODELE 

PRODOC 

PROGET 

PROGRAM 

PROHDR 

PROUST 

PRONAM 

PROREPL 

PROS2R 

PURGALL 

PURGEN 


PURGE  ALL  CYCLES  OF  A  FILE 

PURGE  ALL  HIGH  CYCLES  OF  A  FILE  WHILE  RETAINING  THE  LOW  CYCLE 
PURGE  ALL  LOW  CYCLES  OF. A  FILE  WHILE  RETAINING  THE  HIGH  CYCLE 
CREATE  A  FILE  OF  DIRECTIVES  TO  RESTORE  PERMANENT  FILES 
INVOKE  PFTRANS  TO  TRANSFER  ONE  FILE 
EXTRACT  A  SOURCE  PROGRAM  FROM  TAPE 

PURGE  HIGH  CYCLE  OF  A  FILE  WHILE  RETAINING  THE  LOW  CYCLE 

PURGE  LOW  CYCLE  OF  A  FILE  WHILE  RETAINING  THE  HIGH  CYCLE 

CREATE  CERTAIN  PRINT  MESSAGE  (PM)  RECORDS 

ADD  ONE  PROCEDURE  TO  A  SEQUENTIAL  PROCEDURE  FILE 

LIST  PROCEDURE  NAMES.  PROCEDURE  HEADERS  AND  THE  PROCEDURES  IN 
A  SEQUENTIAL  PROCEDURE  FILE  (COMBINES  PRONAM.  PROHDR  AND 
PROLIST ) 

DELETE  ONE  PROCEDURE  FROM  A  SEQUENTIAL  PROCEDURE  FILE 

LIST  DOCUMENTATION  FOR  PROCEDURES  PROADD.  PROALL,  PRODELE, 
PRODOC,  PROGET,  PROHDR,  PROLIST,  PRONAM,  PROREPL,  PR0S2R 

GET  (EXTRACT)  ONE  PROCEDURE  FROM  A  SEQUENTIAL  PROCEDURE  FILE 

EXECUTE  A  CATALOGED  PROGRAM  (NOT  IN  A  LIBRARY) 

LIST  PROCEDURE  HEADERS  IN  A  PROCEDURE  FILE 

LIST  PROCEDURE ( S )  IN  A  SEQUENTIAL  PROCEDURE  FILE 

LIST  NAMES  OF  PROCEDURES  IN  A  SEQUENTIAL  PROCEDURE  FILE 

REPLACE  ONE  PROCEDURE  IN  A  SEQUEN  IAL  PROCEDURE  FILE 

CONVERT  SEQUENTIAL  PROCEDURE  FILE  TO  RANDOM  EDITLIB  USER 
LIBRARY- 

PURGE  PERMANENT  FILES  OF  SPECIFIED  AC  AND  ID 

GENERATE  PROCEDURE  'PUR'  TO  PURGE  SEVERAL  FILES  WITH  COMMON 
KERNEL 
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RECADD1  ADD  ONE  OR  MORE  LOGICAL  RECORDS  TO  A  ,  iLE 

RECDEL1  DELETE  ONE  OR  MORE  LOGICAL  RECORDS  FROM  A  FILE 

RECDOC  LIST  DOCUMENTATION  FOR  PROCEDURES  RECADD1,  RECDEL1,  RECDOC, 
RECGET1,  RECREP 1 

RECGET1  EXTRACT  ONE  OR  MORE  LOGICAL  RECORDS  FROM  A  FILE 

RECREP  1  REPLACE  ONE  OR  MORE  LOGICAL  RECORDS  IN  A  FILE 

RENAMAC  RENAME  AC  FIELD  ON  PERMANENT  FILES 

RUNBAS  COMPILE  AND  EXECUTE  BASIC  PROGRAM  (SIMILAR  TO  EDITOR  RUN, BAS 
FOR  USE  OUTSIDE  OF  EDITOR) 

RUNFTN  COMPILE  AND  EXECUTE  FTN  PROGRAM  (SIMILAR  TO  EDITOR  RUN , FTN 
FOR  USE  OUTSIDE  OF  EDITOR) 

RUNMNF  COMPILE  AND  EXECUTE  MNF  PROGRAM  UNDER  INTERCOM 

RUNPAS  COMPILE  AND  EXECUTE  PASCAL  PROGRAM  UNDER  INTERCOM 

RUNSEO  COMPILE  AND  EXECUTE  FTN, SEQ  PROGRAM 

RUNTS  COMPILE  AND  EXECUTE  FTN.TS  PROGRAM 

SEGLD  CREATE  A  SEGLOAD  ABSOLUTE  FILE 

SELDUMP  CREATE  BACKUP  DUMP  TAPE  OF  THE  USER  PERMANENT  FILE  OF  AN 
ACCOUNT  NUMBER 

SELLOAD  RESTORE  SELECTED  ROUTINES  FROM  A  BACKUP  DUMPF  TAPE 

SEND  SEND  MESSAGES  TO  AN  INTERCOM  USER  WHO  IS  NOT  LOGGED  IN;  LIST 

MESSAGES 

SORT  INVOKE  SORTMRG  TO  SORT  UP  TO  5  'DISPLAY'  FIELDS  USING 

'■  COBOL6'  COLLATING  SEQUENCE 

SORTCZ  INVOKE  SORTMRG  TO  SORT  UP  TO  5  'DISPLAY'  FIELDS  IN  BT=C,RT=Z 

RECORDS  USING  ' C0B0L6'  COLLATING  SEQUENCE  ('FILE'  CARDS  NOT 
REQUIRED) 

S2K260  ATTACH  FILES  FOR  S2000  (VERSION  2.60)  NATURAL  LANGUAGE, 

FORTRAN,  OR  COBOL  PRECEDURAL  LANGUAGE  INTERFACE 


TIDBITS  LIST  FILE  OF  TIDBITS  (HINTS  ON  IMPROVED  COMPUTER  USAGE) 
TRANPAK  COPY  CONTENTS  FROM  ONE  DEVICE  SET  TO  ANOTHER  FOR  BACKUP 
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UPDADD  ADD  ONE  DECK  TO  AN  UPDATE  LIBRARY 
UPDDELE  DELETE  ONE  DECK  FROM  AN  UPDATE  LIBF '  (Y 

UPDDOC  LIST  DOCUMENTATION  FOR  PROCEDURES  UPDADD,  UPDDELE,  UPDDOC, 
UPDGET,  UPDLIST,  UPDREPL 


UPDGET 

EXTRACT  ONE 

DECK 

FROM 

AN  UPDATE 

LIBRARY 

(UPDATE, C) 

AND, 

~  J 

OPTIONALLY, 

ADD 

EDITOR 

SEQUENCING 

*  .  i 

-5  ■ 

UPDGETS 

EXTRACT  ONE 

DECK 

FROM 

AN  UPDATE 

LIBRARY 

(UPDATE, S> 

AND, 

- f=3 

OPTIONALLY, 

ADD 

EDITOR 

SEQUENCING 

5 

-  *i 

i 

UPDGETT 

EXTRACT  ONE 

DECK 

FROM 

AN  UPDATE 

LIBRARY 

(UPDATE, T ) 

AND, 

OPTIONALLY , 

ADD 

EDITOR 

SEQUENCING 

UPDLIST  LIST  DECK/COMDECK  NAMES  IN  UPDATE  LIBRARY  WITH  COUNT  OF 
RECORDS  IN  EACH  DECK/COMDECK 

UPDREPL  REPLACE  ONE  DECK  IN  AN  UPDATE  LIBRARY 

UTILITY  EXECUTE  A  PROGRAM  ON  EDI TL IB  USER  LIBRARY  'UTILITY' 

VENUS  ATTACH  AND  EXECUTE  ONE  OF  THE  VENUS  RETRIEVAL  PROGRAMS 

WHATLIB  LIST  LIBRARIES  SPECIFIED  IN  LAST  'LIBRARY'  COMMAND 


. . . . . . . . . . . . . I . I . I) . I . . . . I . . . ipip|l|Plililip!i,^ 
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*****  PROCEDURE  DOCUMENTATION  ***** 

THIS  CHAPTER  CONTAINS  THE  DOCUMENTATION  FOR  ALL  PROCEDURES  IN 
PUBLIC-ACCESS  PROCEDURE  FILE  'PROCFIL'. 


***  HOW  TO  PRINT  A  DOCUMENT  *** 

INDIVIDUAL  DOCUMENTS  MAY  BE  PRINTED  USING: 

BEGIN, DOCGET, , PROCF I L ,, <PROCNAME> .OUTPUT . 

WHERE  <PROCNAME>  IS  THE  DESIRED  DOCUMENT. 

SEVERAL  DOCUMENTS  MAY  BE  PRINTED  AT  ONE  TIME  USING: 

JOBNAME . 

CHARGE  ,  .  . 

BEGIN. UTILITY , , MANYDOC . PROCF I L . 

'  7/8/9  EOR 

<-PROCNAME  1  > 

<PROCNAME2> 

<PROCNAMEN> 

"  6/7/ 8/9  EOI 


PROCEDURE  'ADDEXT' 

PURPOSE 

MODIFY  PRIVATE  PACK  DUIY!  FILE  FOR  LEVEL  508  DUMPF/LOADPF 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , ADDEXT , , VSN , SN , RD . MD .  CN . EX . UTK . 

DESCRIPTION  OF  PARAMETERS 

VSN  -  PACK  VOLUME  SERIAL  NUMBER 

SN  -  PACK  SET  NAME 

RD.MD.CN  -  CURRENT  PASSWORDS  (FROM  PACK  INITIALIZATION) 

EX  -  PASSWORD  FOR  LEVEL  508  LOADPF  USE 

UTK  -  USER  TURNKEY  (IF  PASSWORD  IS  ON  PACK! 


DEFAUL’  BEGIN  STATEMENT 
NO  MEANINGFUL  DEFAULT 


MAX  Fl: 

REMARKS 

MU$T  BE  RUN  ON  LEVEL  508  NOS/BE. 


THE  SYSTEM  TURNKEY  PASSWORD  IS  REMOVED  FROM  DUM  FILE:  AN 
EXTEND  PASSWORD  IS  ADDED  TO  ALLOW  LOADPF  AT  LEVEL  508  TO  RUN 
ON  PACKS  INITIALIZED  AT  LEVEL  461  OR  BEFORE. 


AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 


PROCEDURE  ' ANYLIB' 


PURPOSE 

EXECUTE  A  PROGRAM  ON  ANY  EDIT  LIB  USER  LIBRARY 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. ANYLIB, , L IB , ID , PROG , PARAMS . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  1-40  CHARACTER  LIBRARY  PFN 
ID  -  ID  IT  IS  CATALOGED  UNDER. 

■DEFAULT:  SYSTEM  PUBLIC  ACCESS  ID) 

USE  0  (ZERO)  IF  FILE  IS  ALREADY  ATTACHED 
AND  IS  TO  REMAIN  ATTACHED  AT  THE  END  OF  THE 
PROCEDURE. 

PROG  -  PROGRAM  TO  BE  EXECUTED 
PARAMS  -  UP  TO  13  PARAMETERS  FOR  'PROG' 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  ON  PROGRAM  BEING  EXECUTED 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  1975 

DATE ( S )  REVISED 

03/01/78  -  CONVERT  TO  CCL 


PROCEDURE  'ANYPRO' 

PURPOSE 

EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, ANYPRO. .PFN. ID , PRO . PARAMS. 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  OF  PROCEDURE  FILE 
ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED 

PRO  -  PROCEDURE  NAME 

PARAMS  -  UP  TO  17  POSITIONAL  PARAMETERS  FOR  PROCEDURE  'PRO' 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 


REMARKS 

SEE  'MY PRO 


'HE  PFN  IS  ' PROCFIL' 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  07/21/76 
DATE ( $  I  REVISED 


01/21/81 


ANYPRO 


. . . . . 


PROCEDURE  'ANYPROS' 


PURPOSE 

EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  SEQUENTIAL  PROCEDURE 
FILE 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , ANYPROS. , PFN . ID , PNAME . PARAMS. 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  OF  PROCEDURE  FILE 
ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

PNAME  -  PROCEDURE  NAME 

DARAMS  “  UP  TO  17  POSITIONAL  PARAMETERS  FOR  PROCEDURE  'PRO' 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

‘  MAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 


REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  10/29/79 
DATE { S  i  REVISED 


t 
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PROCEDURE  'AUDIT' 


PURPOSE 

SORTED  I  FAST  I  USER  AUDIT 

FUNCTIONAL  CATEGORIES:  QO  SO  Ml 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, AUDIT. ,<KEYWORD-PARAMETERS>. 

DESCRIPTION  OF  PARAMETERS 

ALL  'AUDIT'  PARAMETERS  ARE  SUPPORTED  WITH  ONLY  THREE 
RESTRICTIONS: 

1i  MULTIPLE  ID'S  MUST  BE  S-DEL IMI TED  AND  LIMITED  TO  40 
CHARACTERS  i UP  TO  7  ID'S).  WHEN  MULTIPLE  ID'S  ARE 
GIVEN.  A  SEPARATE  PARAMETER  '  3DM=Y£S’  MUST  BE 
SPECIFIED.  FOR  EXAMPLE. 

BEGIN. AUDIT, . ID-SI D t / ID2/ ID3S . <OTHER-PARAMS> , 
IDM='ES. 

2 i  FOR  ■ AC  .  USE  AC=AC. 

3 1  IF  PF  IS  SPECIFIED.  IT  MUST  NOT  EXCEED  10  CHARACTERS. 
SORTING  IS  NOT  REALLY  NECESSARY  FOR  PF .  INSTEAD,  USE 
AUDIT . PF=<PFN> . 

IN  ADDITION,  UP  TO  6  FIELDS  MAY  BE  SORTED  (KEYWORDS  ARE  S1  = 
THRU  S6=  > : 

i A= ASCENDING.  DESCENDING) 

1A/1D  -  PF  NAME  -  ALL  SORTS 
2A/2D  -  CYCLE  -  ALL  SORTS 
3A/3H  -  ID  -  AC  SORT  ONLY 

4A/4D  *  ACCOUNT  -  ID  (AI=I)  OR 
SEG  -  AC=ddddddddOO 
5A/5D  -  CREATED  -  AC  OR  ID  ( AI=I ) 

6A/6D  -  USED-ON  -  AC  OR  ID  <A1=I) 

7A/7D  -  *  USES  -  AC  OR  ID  ( A I  ss  I  I 

8A/BD  -  U  PRUS  -  AC  OR  ID  (A1  =  D 

PL=  MAY  BE  USED  TO  CHANGE  THE  'OUTPUT'  LINE  LIMIT. 

DEFAULT  BEGIN  STATEMENT 

BEGIN, AUDIT, ,ID=<CHG-CRD/LOGIN  I D > , LF  =  OUTPUT , S 1  =  1 A , S2-2D , 
WHEN  AC=d JdddJd JOO  IS  SPECIFIED: 

BEGIN, AUDIT. . ID=<CHG-CRD/LOGIN  ID> , LF=OUTPUT , $1=4A . S2=3A , 
S3=1A,S4=2D. 

MAX  FL:  52000B 

REMARKS 

NONE 


01/21/81 
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AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  03/22/78 


DATE  I S )  REVISED 


03/01/78 

05/10/78 

05/26/78 

10/01/78 

12/18/78 


CONVERT  TO  CCL 

ADD  IDM  PARAMETER  FOR  MULTIPLE 
REWRITE  VALIDATION  ROUTINE 
PROCEDURE  'AUDIT'  REMOVED. 

THIS  PROCEDURE  ' FASTAUD'  RENAME 
ADD  SUPPORT  FDR  SN  PARAMETER 


ID'S 

'AUDIT' 


PROCEDURE  ' BANNERS 


PURPOSE 

PRINT  A  PAGE  WITH  1  TO  8  BANNERS 

FUNCTIONAL  CATEGORIES:  d4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , BANNERS , . OUTPUT . NBANR , B 1 , B2 , 63 , 84 , B5 , B6 , B7 , B8 . 

DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LISTABLE  OUTPUT 
NBANR  -  NUMBER  OF  BANNERS  TO  PRINT  C 0 - 8 ‘ 

(0  -  PROGRAM  WILL  DETERMINE  NUMBER  OF  BANNERS  AND 
ADD  DATE  AND  TIME  BANNERS.  IF  THERE  IS  ROOM) 
51-88  -  UP  TO  8  BANNERS  (1-10  CHARACTERS  EACH) 

THE  FOLLOWING  ARE  RECOGNIZED  FOR  ANY  BI : 

CPU  -  MACHINE  JOB  IS  RUNNING  ON 

DATE  -  CURRENT  DATE 

TIME  -  CURRENT  TIME 

DEFAULT  BEGIN  STATEMENT 

BEGIN . BANNERS , . OUTPUT . 0 , CPU . DATE . TIME . 

MAX  FI:  340006 

REMARK ^ 

1.2,  3.  5,  AND  6  BANNERS  ARE  PRINTED  AT  6  LINES/INCH. 

A.  7  AND  8  BANNERS  ARE  PRINTED  AT  8  LINES/INCH  WITH  THE 
PRINTER  RESTORED  TO  6  LINES/INCH  AT  END-OF-PROCEDURE . 

AUTHORS 

GARY  L  STUMP  -  DTNSRDC  CODE  2731 
DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  03/22/78  -  GLS 

DATE  I  Si  REVISED 
06/23/78  -  DVS 


* 

4  i 


/ft  1 
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PROCEDURE  '  BDT' 

PURPOSE 

PRINT  A  BANNER  PAGE  WITH  DATE  AND  TIME 

functional  categories*  qo 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. BDT. .OUTPUT. 

DESCRIPTION  OF  PARAMETER 
OUTPUT  -  LI  STABLE  OUTPUT 

DEFAULT  BEGIN  STATEMENT 
BEGIN. BDT. .OUTPUT. 

WAX  FL:  23000B 

remarks 

NONE 

AUTHOR 

DuviD  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WR I ! T E N ;  EARLY  1975 

D/TEISi  REVISED 

03/01/78  -  CONVERT  TO  CCL 
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PROCEDURE  ' BIGLOAD' 

PURPOSE 

CREATE  AN  ABSOLUTE  FILE  WHICH  WILL  ALLOW  SOME  LARGE 
PROGRAMS  TO  LOAD  IN  LESS  CORE  THAN  NORMALLY  NEEDED 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. BIGLOAD. .PROGRAM. FL. LFN. ID. PW1.PW2. 

DESCRIPTION  OF  PARAMETERS 

PROGRAM  -  NAME  OF  USER' S  PROGRAM 

(THIS  WILL  ALSO  BE  THE  LFN  OF  THE  GENERATED  FILE i 
FL  -  AT  LEAST  EXACT  OCTAL  FIELD  LENGTH  REQUIRED  TO 

EXECUTE  THE  USER'  S  PROGRAM 

i£ .6. .  60000  (THE  B  AT  THE  END  IS  HOT  SPECIFIED!? 
1  PM  -  !  FN  PtF  iKCfi'  n  AP^ntllTP  PSORCAM 


600 

AA  # 

uu  I 

T  HE  B 

THE  END 

IS 

HO' 

R°  5 

AESQL 

UTE 

PROGRAM 

BE 

1  N? 

SAME 

AC 
#—  w 

< PROGRAM 

>  1 

Cl  F 

?  HA 

1  isiU  « 

the 

USE 

R’S  PROGR 

AM 

ON 

Lis  4 1 
!  | 

n  i=r 

W  FIL 

**  / 

PROGRAM> 

AFT 

ER 

;if  I 

Zt\ 

Lbi  . 

FILE 

<PR 

OGRAM>  WI 

LL 

BE 

PROGRAM i 

ID  -  If  SPECIFIED.  FILE  <PRQGRAM>  WILL  BE  CATALOGED 

WITH  PPM  OF  cROGRAK>  UNDER  THIS  ID 
PW1.PW2  -  IF  ID  SPECIFIED.  THESE  ARE  PASSWORDS  FOR  THE 

CATALOG  I PW= 1 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  47000B 

REMARKS 

BEFORE  EXECUTING  THIS  PROCEDURE.  THE  ABSOLUTE  USER'S  PROGRAM 
SHOULD  BE  ATTACHED  OR  CREATED  < WITH  AN  LFN  OTHER  THAN  THE 
PROGRAM  NAMti.  THIS  PROCEDURE  WILL  THEN  CREATE  A  NEW  FUE 
WITH  LFN  OF  <PROGRAK>  WHICH  CONTAINS  A  SHORT  COMPASS  PROGRAM 
FOLLOWED  BY  THE  USER'S  ABSOLUTE  PROGRAM. 

THE  LOADER  LOADS  THE  COMPASS  PROGRAM  WHICH  IN  TURN  LOADS  THE 
USER' S  PROGRAM. 

ERROR  MESSAGES 

FL  NOT  SPECIFIED 

■’L  PARAMETER  MUST  BE  SPECIFIED 

PROGRAM  CANNOT  BE  SAME  AS  LFN 

PARAMETERS  1  AND  3  MUST  BE  DIFFERENT 


f  )i 


p .  *  /  i  #  n  < 

Ul/tht  ! 


PROGRAM  NOT  SPECIFIED 

PROGRAM  PARAMETER  MUST  BE  SPECIFIED 


EXAMPLE  .  _ „ 

COMPILE  PR'^RAM,  CREATE  AND  CATALOG  NEW  LOAD  FILE,  EXECUTE: 

ATTACH, IN, SOURCEPROGRAM. ID=XXXX.  SOURCE  FOR  <MYPROG> 
FTN, lsIN.OPTsl.LsO. 

*  LOAD.LGO.  OR  XEQ , LOAD=LGO , NOGO=ABS  (INTERCOM! 

*  NOGO.ABS. 

BEGIN , BIGLOAD, .MYPRQG, 57000, ABS.XXXX. 

MYPROG . 

*  NOTE:  IF  <MYPROG>  IS  AN  OVERLAY,  THE  ABSOLUTE  WILL  BE 
GENERATED  ON  THE  FILE  SPECIFIED  IN  THE  OVERLAY 
CARD.  THIS  LFN  MUST  BE  CHANGED  (USE 
BATCH , LFN 1 , RENAME , LFN2  IN  INTERCOM  OR  COPY  TO 
ANOTHER  FILE)  BEFORE  USING  BIGLOAD. 

AUTHOR 

DAVID  V  SOMMER  *  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  11/09/77 

DATE i S  >  REVISED 

03/01/78  -  CONVERT  TO  CCL 


PROCEDURE  ' BR2CCL' 

PURPOSE 

CONVERT  SEQUENTIAL  (UNIVERSITY  OF  WASHINGTON)  BEGIN/REVERT 
PROCEDURE  FILE  TO  SEQUENTIAL  (CDC-SUPPORTED)  CYBER  CONTROL 
LANGUAGE  FILE  AND,  OPTIONALLY,  CATALOG  THE  CCL  FILE 

FUNCTIONAL  CATEGORIES:  M2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, BR2CCL, , BR . CCL, ID , OUTPUT. 

DESCRIPTION  OF  PARAMETERS 

BR  -  SEQUENTIAL  BEGIN/REVERT  PROCEDURE  FILE 

CCL  -  OUTPUT  SEQUENTIAL  CCL  PROCEDURE  FILE 
ID  -  IF  SPECIFIED,  <CCL>  WILL  BE  CATALOGED  AS: 

PROCFILS. 1D=<SPECIFIED-ID> 

IF  OMITTED,  <CCL >  WILL  NOT  BE  CATALOGED 
OUTPUT  -  LI  STABLE  OUTPUT 

■CONVERSION  PROGRAM  OUTPUT  AND  LIST  OF  CONVERTED 
PROCEDURE  FILE) 

DEFAULT  BEGIN  STATEMENT 

BEGIN , BR2CCL , , SR, CCL, .OUTPUT. 

MAX  FI:  100000B 

TIMING:  VERY  SLOW  --  ABOUT  4  B/R  STATEMENTS  PER  CP  SECOND 
REMARKS 

THIS  PROCEDURE  MAY  ONLY  BE  RUN  IN  BATCH  MODE  (WITH  CMIOOOOO 
ON  THE  JOB  CARD). 

ALL  PROCEDURES  MUST  BE  NAMED.  CCL  D0E5  NOT  SUPPORT  UNNAMED 
PROCEDURES. 

ANY  EMBEDDED  BINARY  (OR  DATA)  RECORDS  MUST  BE  REMOVED  BEFORE 
THE  B/R  PROCEDURE  FILE  IS  CONVERTED. 

THE  FIRST  CARD  OF  EACH  LOGICAL  RECORD  IS  ASSUMED  TO  BE  A 
PROCEDURE  HEADER  AND  WILL  BE  CONVERTED.  IF  IT  WAS  AN 
UNNAMED  PROCEDURE  OR  A  DATA  RECORD.  THE  GENERATED  HEADER 
MUST  BE  RESTORED  TO  THE  ORIGINAL  AND,  FOR  AN  UNNAMED 
PROCEDURE.  AN  APPROPRIATE  HEADER  STATEMENT  MUST  BE  ADDED. 

OUTPUT  RECORDS  WILL  BE  UP  TO  90  CHARACTERS  LONG.  CORRECT 
ANY  WHICH  ARE  LONGER  THAN  80  CHARACTERS. 

EDI TL I B  IS  USED  TO  CREATE  RANDOM  PROCEDURE  FILES.  THE  B/R 
PROGRAM  'CPINDEX'  IS  NO  LONGER  AVAILABLE. 
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AUTHORS 

PROCEDURE 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
CONVERSION  PROGRAM 
S  W  CUMPSTON 
UNIVERSITY  OF  ADELAIDE 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/14/78 

DATE ( S )  REVISED 

03/01/78  -  CONVERT  TO  CCL 


01/21/81 
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BR2CCL 


B/R  FEATURE  RETAINED 

CASE  -  PERMITS  SELECTION  OF  ONE  STATEMENT,  USING  A  GIVEN 
PARAMETER,  FROM  A  SET  OF  CONTROL  STATEMENTS. 


FEATURES  REMOVED 

I F ( MON  -  ALLOW  CONDITIONAL  EXECUTION  DEPENDING  ON  THE  DAY 
I F ! TUES  OF  THE  WEEK.  AN  ALTERNATIVE  METHOD  IS  DESCRIBED 
ETC.  BELOW. 

I F < EOR  -  ALLOW  CONDITIONAL  EXECUTION  DEPENDING  ON  WHETHER 
I F ( EOF  THE  LAST  READ  OPERATION  ON  A  GIVEN  FILE 

IFIEOI  ENCOUNTERED  AN  EOR,  EOF  OR  EOl .  THE  ONLY  TEST 

AVAILABLE  WITH  CCL  IS  THAT  FOR  EOF.  AND  TAKES  THE 
FORM: 

IFEIFILEILFN, EOF  I .LABEL' 

CUP  -  DUPLICATE  ONE  OR  MORE  CONTROL  CARDS.  A  S  IN  THE 
ENDUP  DUP  LOOP  IS  REPLACED  BY  THE  NEXT  SEQUENTIAL  NUMBER 

(1.2 _ '.  WHILE/ENDW  WILL  REPLACE  DUP/ENDUP. 

THE  S  FEATURE  IS  NOT  AVAILABLE  IN  CCL.  THE 
CONVERSION  PROGRAM  WILL  NOT  PROCESS  DUP/ENDUP  OR 
REMOVE  THE  S.  A  SUGGESTED  CHANGE: 


.  B/R . CCL  . 

DUF ,5.3.  -OR-  DUP. 5.*.  SET. Rial. 

CARD  1  ...  WHILE ,R1 .LE .5. LOOP. 

CARD  2  ENDUP. 

CARD  3  SET , R 1 =R 1 + 1 . 

ENDW , LOOP . 


5-CCL  DIFFERENCES 
HEADER  STATEMENT 


*  .PROC.*  ADDED  AT  START.  PROCEDURE  NAME  TRUNCATED  TO  7 
CHARACTERS.  IF  NECESSARY,  THE  M*  SEPARATOR  IS  CHANGED 
TO  COMMA  AND  THE  TERMINATOR  IS  CHANGED  TO  PERIOD. 


*DATA  *FILE 

••DATA  AND  *F  I  LE  ARE  REPLACED  BY  ADATA  AND  #F  I  LE  . 
RESPECTIVELY,  AND  MAY  BE  USED  ONLY  IN  THE  HEADER 
STATEMENT.  THE  CONVERSION  PROGRAM  WILL  ADD 
' CCLDATA=#DATA , CCLFILE=#FILE'  TO  EACH  HEADER  STATEMENT 
AND  CHANGE  REFERENCES  IN  THE  PROCEDURE  BODY  TO 
CCLDATA  OR  CCLFILE. 


BR2CCL 


LABELS 

LABELS  MAY  NOT  BE  OMITTED  OR  CONTAIN  A  NUMERIC  LINE 
COUNT.  A  LABEL  STARTING  WITH  AN  ALPHABETIC  CHARACTER 
MUST  BE  SUPPLIED. 

SKIP 

LABEL  MAY  NOT  BE  OMITTED  OR  CONTAIN  A  NUMERIC  LINE  COUNT. 
A  LABEL  STARTING  WITH  AN  ALPHABETIC  CHARACTER  MUST  BE 
SUPPLIED. 

ELSE/ENDIF 

LABELS  MUST  BE  SUPPLIED.  NOTE  THAT  AN  UNLABELLED 
STATEMENT  MAY  NEED  TO  BE  REPLACED  BY  SEVERAL  LABELLED 
STATEMENTS. 

IF (MON...  IFITUE...  ETC. 

THESE  STATEMENTS  ARE  NOT  PROVIDED.  HOWEVER,  THE  EFFECT 
MAY  BE  ACCOMPLISHED,  ALBEIT  CLUMSILY,  USING  CASE  <  *DAY ) 
FOLLOWED  BY  A  SERIES  OF  SET  STATEMENTS.  A  FOLLOWING  IFE 
STATEMENT  MAY  THEN  TEST  THAT  A  PARTICULAR  VALUE  HAD  BEEN 
SET . 

IF'EOR...  in  EOF...  IFtEOI... 

ONLY  A  SINGLE  TEST  FOR  EOF  IS  PROVIDED.  THUS, 

IF' EOR/EOF/EOI ,LFN, LABEL )  BECOMES 
IFE-.FiLEtLFN.  EOF?,  LABEL1. 


IF (AM...  IF: PM... 

ONE  OF  THE  PREDEFINED  VARIABLES  KNOWN  TO  CCL  AND 
AVAILABLE  IN  AN  IFE  STATEMENT  IS  CALLED  TIME.  THUS, 
IFfAM. LABEL)  BECOMES  I FE ( ( TIME . LT . 1200  I , LABEL ) 

IF • PM. LABEL  >  BECOMES  I FE (( T IME . GE . 1200 ), LABEL ) 
THE  LABEL  MAY  NOT  BE  OMITTED  OR  CONTAIN  A  NUMERIC  LINE 

MUST T BE  SUPP5IEDSTARTING  WITH  AN  ALPHABETIC  CHARACTER 

I  F  {  BATCH .  .  .  I F  i  INTERCOM  ...  I  F  { I  NT .  .  . 

ONE  OF  THE  PREDEFINED  VARIABLES  KNOWN  TO  CCL  AND 
AVAILABLE  IN  AN  IFE  STATEMENT  IS  CALLED  OT .  THUS, 

I F ( BATCH .  .  .  BECOMES  IFE (OT .NE . TXO _ ) 

IF  ■:  INTERCOM.  .  .  BECOMES  I  FE  S  OT  .  EQ  .  TXO _ ) 

IF i INT . . .  BECOMES  I FE ( OT . EQ . TXO _ ) 

IF! 6400...  IF (6600...  IF (6700... 

ONE  OF  THE  DTNSRDC* ADDED  PREDEFINED  VARIABLES  KNOWN  TO 
CCL  AND  AVAILABLE  IN  AN  IFE  STATEMENT  IS  CALLED  MF . 
THUS, 

I F  f  6400 . , .  BECOMES  I FE ( MF . EQ . $MFC$ _ ) 

IF ( 6600 . . .  BECOMES  I FE ( MF . EQ . $MFB$ _ ) 

IF  I  6700 . . .  BECOMES  I FE (MF . EC. SMFAS _ ) 


6* 
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CORRECTIONS  THE  USER  MUST  MAKE  AFTER  USING  THE  CONVERSION 
PROGRAM: 


B/R 


HEADER  PARAMETER  OF 
THE  FORM  *PARAM= 

ELSE ( N )  NsNUMBER 


DUP/ENDUP 


*  FOR  LABEL  IN  IF, 
IFC.  ELSE,  SKIP 

ONE  OR  MORE 
PROCEDURES  FOLLOW 
■'DATA  CARD  (  S  ) 

SENSE  SWITCH  TEST  OF 
THE  FORM: 

IF iSSW.-N, LABEL) 
WHERE  N= 1,2, 3, 4. 5, 6 

UNNAMED  PROCEDURE 


DATA  RECORD 


CONVERTS  TO 
PARAM=$*PARAM$ 

NO  CHANGE 

NOT  CHANGED 


STATEMENT  NOT 
CONVERTED 

HEADERS  NOT 
CHANGED 


1FEISW-N. LABEL 


FIRST  CARD  IS 
CONVERTED  TO 
A  HEADER 

FIRST  CARD  IS 
CONVERTED  TO 
A  HEADER 


CORRECTION 

PARAM= 


ELSE ( LABEL ) 

IF  NEEDED,  SUPPLY 
ENDI F ( LABEL ) 

REPLACE  WITH  WHILE/ 
ENDW  (SEE  PAGE  2). 
REMOVE  $  IN  LOOP 

CONVERT  STATEMENT 
MANUALLY 

MAKE  NEW  HEADERS 


1 FE ( . NOT. SWN, LABEL 


RESTORE  TO  ORIGINAL 
AND  ADD  AN 
APPROPRIATE  HEADER 

RESTORE  TO  ORIGINAL 


CORRECTION  THE  USER  MAY  MAKE  AFTER  USING  THE  CONVERSION 
PROGRAM  'THESE  ARE  NOT  MANDATORY,  BUT  WILL  IMPROVE  THE 
RUNNING  OF  THE  PROCEDURE): 


B/R 

CONVERTS  TO 

CORRECTION 

NO  REFERENCE  TO  *DATA 
IN  PROCEDURE 

CCLDATA=0DATA 

IN  HEADER 

REMOVE 

NO  REFERENCE  TO  *F I LE 
IN  PROCEDURE 

CCLF I LE=#r ] LE 

IN  HEADER 

REMOVE 

HEADER  PARAMETER  OF 

THE  FORM  *PARAMsPARAM 

PARAM=PARAM 

PARAM 

2  - 1 6 
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PROCEDURE  ' B7700S' 


PURPOSE 

PREPARE  9-TRACK  EBCDIC  TAPE  TO  MOVE  A  SINGLE  CARD-IMAGE 
PERMANENT  FILE  FROM  THE  CDC  6000  TO  THE  BURROUGHS  B7700 

FUNCTIONAL  CATEGORIES:  K4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN .B7700S, , PFN , ID, VSN , SLOT , L , PW1 , PW2 . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  (UP  TO  40  CHARACTERS) 

ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED 

VSN  -  DIEBOLD  TAPE  NUMBER 

SLOT  -  OPTIONAL  SLOT  NUMBER  (IF  VSN  IS  A  BAOOOO  TAPE) 

L  -  OPTIONAL  TAPE  LABEL  'IF  OMITTED,  L= ID ) 

PW1.PW2  -  OPTIONAL  PASSWORDS  \ RD  AND  TK  ONLY) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

THE  TAPE  HAS  MAXRECS1 ZE=B0 .  BLOCKS1ZE=3640 ,  BLOCKING=48. 
ERROR  MESSAGES 

B7700S  REQUIRES  MAG  TAPE  AND 
MUST  BE  RUN  FROM  BATCH 

FATAL.  USER  TRIED  TO  EXECUTE  PROCEDURE  VIA  INTERCOM. 

ID  MUST  BE  SPECIFIED 

FATAL.  SELF-EXPLANATORY. 

VSN  MUST  BE  SPECIFIED 

FATAL.  SELF-EXPLANATORY. 

EXAMPLES 

1.  TAPE  IS  NORMALLY  KEPT  IN  THE  6700/6600  ROOM  (CA.  CB 
SERIES!  OR  THE  CYBER  74  ROOM  iCJ,  CR  SERIES): 

BEGIN. B7700S, .MYFILE.XXXX .CA9999 . 

2.  TAPE  IS  NORMALLY  KEPT  IN  THE  B7700  ROOM  (BA  SERIES)  AND 
IS  IN  SLOT  03  IN  THE  CDC  6700  ROOM: 

BEGIN .B7700S, ,MYF I LE . XXXX , BA9999 , 03 . 


I  OF 


81 


B7700S 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  04/09/79 
DATE ( S )  REVISED 

05/17/79  -  ADD  LABEL  t-ARAMETER  (L) 

IS^iKZ9  '  ADD  PASSWORD  PARAMETERS  (PW1.PW2) 
10/17/79  -  FIX  VSN  CARD 


PROCEDURE  'B7700U' 


PURPOSE 

PREPARE  9-TRACK  EBCDIC  TAPE  TO  MOVE  A  SINGLE  DECK  OR  AlL 
DECKS  IN  AN  UPDATE  LIBRARY  FROM  THE  CDC  6000  TO  THE 
BURROUGHS  B7700 

FUNCTIONAL  CATEGORIES:  K4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN . B7700U . , L IB , ID , DECK , VSN , SLOT . L .NOPL . PW1 , PW2 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  PFN 

(FULL  PFN  IS  LIB  PL) 

(SEE  PARAMETER  'NOPL'  BELOW) 

ID  -  ID  UNDER  WHICH  LIB  PL  OR  LIB  IS  CATALOGED 

DECK  -  SINGLE  DECK  TO  BE  TRANSFERRED 

(IF  OMITTED.  ENTIRE  LIBRARY  IS  TRANSFERRED) 

VSN  -  DIEBOLD  TAPE  NUMBER 

SLOT  -  OPTIONAL  SLOT  NUMBER  (IF  VSN  IS  A  BAOOOO  TAP 
L  -  OPTIONAL  TAPE  LABEL  (IF  OMITTED.  L-1D ( 

NOPL  -  IF  OMITTED  -  LIBRARY  PFN  IS  LIB_PL 

IF  NON-BlANK  -  LIBRARY  PFN  IS  LIB 

PW1.PW2  -  OPTIONAL  PASSWORDS  ( RD  AND  TK  ONLY) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  43000B 

REMARKS 

AN  80-CHARACTER  COMPILE  FILE  IS  CREATED  ( SEQUENCING  IN 
73-80!  AND  WRITTEN  TO  TAPE. 

THE  TAPE  HAS  MAXRECSIZE  =  80 .  BLOCKSiZE  =  3840.  BLOCKINGS. 

ERROR  MESSAGES 

E7700U  REQUIRES  MAG  TAPE  AND 
MUST  BE  RUN  FROM  BATCH 

FATAL.  USER  TRIED  TO  EXECUTE  PROCEDURE  VIA  INTERCOM. 

ID  MUST  BE  SPECIFIED 

FATAL.  SELF-EXPLANATORY. 

VSN  MUST  BE  SPECIFIED 

FATAL.  SELF-EXPLANATORY. 
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EXAMPLES 

1.  TRANSFER  DECK  ' MYDECK'  FROM  LIBRARY  ' MYLIBPL' .  TAPE  IS 
NORMALLY  KEPT  IN  THE  6700/6600  ROOM  (CA,  CB  SERIES)  OR 
THE  CYBER  74  ROOM  (CJ,  CR  SERIES): 

BEGIN. B7700U, , MYLIB.XXXX. MYDECK, CA9999. 

2.  TRANSFER  ENTIRE  LIBRARY  (LIBRARY  PFN  IS  ' MYLIB'  )  .  TAPE 
IS  NORMALLY  KEPT  IN  THE  B7700  ROOM  (BA  SERIES)  AND  IS  IN 
SLOT  03  IN  THE  CDC  6700  ROOM: 

BEGIN, B7700U. .MYLIB.XXXX, ,BA9999,03, ,X. 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  04/09/79 


D 


TEi$)  REVISED 
05/17/79  -  ADD 
07/03/75  -  ADD 
10/16/79  -  ADD 
10/17/79  -  FIX 


LASEL  PARAMETER  (L) 
NOPL  PARAMETER 
PASSWORD  PARAMETERS 
VSN  CARD 


(  PW1 , PW2 ) 
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PROCEDURE  ' CALC3D' 

PURPOSE 

THREE-D  PROCEDURE  FOR  CALCOMP  PLOTTERS 

FUNCTIONAL  CATEGORIES:  J5 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, CALC3D , . MAC , VSN 1 . VSN2 . T ID , INPUT , RERUN . 

DESCRIPTION  OF  PARAMETERS 
MAC  -  ONE  OF  -- 

763  *  CALCOMP  763  PLOTTER 

936  -  CALCOMP  936  PLOTTER  < DEFAULT ) 

170  -  CALCOMP  PLOTTER  ON  HIGH  SPEED  REMOTE 
TERMINAL 

VSN1  -  TAPE  DIEBOLD  OR  SLOT  NUMBER 
! 6  CHARACTERS  OR  LESS) 

(UNLABELLED  TAPE  FOR  MAC=763; 

LABELLED  TAPE  FOR  MAC=936 » 

VSN2  -  EXTERNAL  STICKER  LABEL 

(SLOT  TAPES  ONLY: 

TID  -  TERMINAL  ID  FOR  ROUTING  PLOTTER  OUTPUT 
(USED  ONLY  WHEN  MAC- 1 70  » 

(DEFAULT:  012  5 

INPUT  -  FILE  CONTAINING  CONTROL  CARDS 
RERUN  -  THIS  PARAMETER  FACILITATES  SAME  DAY  RERUN  USING 
THE  SAME  TAPE. 

OMITTED  OR  '  W'  •  FIRST/ONLY  TIME  THIS  TAPE  IS  USED 

TODAY 

' R'  -  RERUN  ON  SAME  DAY 

THIS  PARAMETER  HAS  MEANING  ONLY  FOR  MAC=936. 

HOWEVER,  IF  SPECIFIED,  IT  MUST  BE  A  VALID  ENTRY. 

DEFAULT  BEGIN  STATEMENT 

BEGIN, CALC3D, ,936, *.*.012, INPUT. W. 

*  -  NO  DEFAULTS  FOR  THESE  PARAMETERS 


MAX  FL: 


REMARKS 

A  936  JOB  WILL  CREATE  A  LABELLED  TAPE  WITH  A  RETENTION 
PERIOD  OF  ONE  DAY.  SUBSEQUENT  RERUN • S »  ON  THE  SAME  DAY 
WILL  CAUSE  THE  JOB  TO  TERMINATE  BECAUSE  OF  UNEXPIRED  LABEL. 
SPECIFYING  RERUN=R  WILL  CAUSE  THE  CURRENT  LABEL  TO  BE 
CHECKED  RATHER  THAN  BE  RE-WRITTEN.  THE  FIRST  OR  ONLY 
RUN  SHOULD  OMIT  THE  RERUN  PARAMETER  SO  THAT  THE  CURRENT  DATE 
WILL  BE  WRITTEN  ON  THE  LABEL. 


r  *i 

V**** 


C3D 
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EXAMPLES 

BEGIN, CALC3D, ,936. CA9999. 

(USE  LABELLED  TAPE  CA9999  FOR  CALCOMP  936  PLOTTER 

BEGIN, CALC3D, ,763. SLOTOI .MYTAPE. 

(USE  UNLABELLED  TAPE  IN  SLOT  01  HAVING  EXTERNAL 
LABEL  ■MYTAPE'  FDR  CALCOMP  763  PLOTTER) 

AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  EARLY  1975 

DATE ( S i  REVISED 
07/23/76 

10/07/76  -  MAKE  TRANSPARENT  TO  USER 
03/01/78  -  CONVERT  TO  CCl 


PROCEDURE  ' CCNOTE 


PURPOSE 

PRINT  A  COMPUTER  CENTER  NOTE  OR  THE  CCN  INDEX 

FUNCTIONAL  CATEGORIES:  SO 

COMPUTER 
CDC  6000 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGI N . CCNOTE . . OPT . OUTPUT . LEFT . PD . 

DESCRIPTION  OF  PARAMETERS 


OUTPU1 

LEFT 


-  OPTION.  ONE  OF: 

INDEX  -  BOTH  TOPIC  AND  NUMBER  INDICES 
NUMBER  -  INDEX  ORDERED  BY  CCN  NUMBER 
TOPIC  -  INDEX  ORDERED  6*  TOPIC 

vvnn  *  l  specific  ccn.  where 

W  is  THE  VOLUME  (2  DIGITS* 

NN  IS  THE  NUMBER  (2  DIGITS i 
OTHER  -  ASSUMED  TO  BE  <VVNN>  AND  WILL  HAVE 
UNPREDICTABLE  RESULTS  IF  IT  IS  NOT 

-  LI  STABLE  OUTPUT 

-  CENTERING 

LEFT  OR  OMITTED  -  LEFT  JUSTIFIED  ON  PAGE 

(WILL  FIT  ON  NARROW  PAPER f 
ANYTHING  ELSE  -  CENTERED  ON  WIDE  PAPER 

-  PRINT  DENSITY  (FOR  OPT  =  INDEX/NUMBER/TOPIC  ONLY  * 

8  -  8  LINES  PER  INCH 

6  -  6  LINES  PER  INCH  (REQUIRED  FOR  FICHE  OR  XEROX  I 


DEFAULT  BEGIN  STATEMENT 

BEGIN. CCNOTE. .INDEX. OUTPUT. LEFT, B. 

MAX  FL:  33000B 


REMARKS 


AUTHOR 


SOMMER 


TNSRDC  CODE  1892.2 


WRITTEN:  07/10/80 


i 


PROCEDURE  '  COMQ' 

PURPOSE 

PREPARE  AND  ROUTE  A  FILE  TO  THE  MICROFICHE  QUEUE 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTER 
CDC  6000 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. COMQ LFNPFN . ID . HEADER , F ID. PROG. SHIFT . 

DESCRIPTION  OF  PARAMETERS 

LFNPFN  -  LFN  OR  PFN  OF  FI-lE  TO  3E  LISTED 
(DEPENDS  ON  PARAMETER  ID) 

ID  -  IF  OMITTED.  LFNPFH  IS  AN  LFN 

If  SPECIFIED.  LFNPFN  IS  A  PFN  CATALOGED 
UNDER  THIS  ID 


THE  FICHE  -if  any  non -alphameric  CHARACTERS. 
HEADER  MUST  BE  DOLLAR -DELIMITED: 

STHIS  HEADER  IS  DOLLAR -DEL I MI  TEDS  > 

FID  FOR  ROUTING  THE  FILE 

COM  PROGRAM  TO  USE.  MUST  BE  ONE  WHICH  SUPPORTS 
A  32-CHARACTER  EYE-READABLE  TITLE  IN  THE  SECOND 
LINE  OF  THE  FILE.  SUCH  AS: 

COMP  -  FOR  COMPILATION  AND  LOAD  MAP  LISTINGS 
(WILL  CREATE  AN  INDEX) 

(132  CHARACTERS  PER  LINE. 

268  PAGES  PER  FICHE. 

PLUS  2  INDEX  FRAMES) 

COMPF  -  SAME  AS  COMP,  WITH  A  BOX  AROUND  EACH 
p  RaMP 

COMQ  -  FOR  REGULAR  OUTPUT 

(132  CHARACTERS  PER  LINE, 

270  PAGES  PER  FICHE) 

COMQF  -  SAME  AS  COMQ,  WITH  A  BOX  AROUND  EACH 


(FILE  HAS  CARRIAGE  CONTROL  IN  COLUMN  1  C 
EACH  RECORD.  SUCH  AS  A  COMPILATION  LISTI 
PROGRAM  OUTPUT! 

1  -  SHIFT  1  POSITION  TO  THE  RIGHT 

(STANDARD  COPYSF:  USE  FOR  SOURCE  OR  DATA 
FILES 

:  1  -  SHIFT  SPECIFIED  NUMBER  OF  COLUMNS 
•  DEFAULT;  0 5 

EGIN  STATEMENT 
rniifi  mas  a  n 


REMARKS 

THIS  PROCEDURE  CREATES  A  FILE  WHICH  CONTAINS: 

.  A  CARD- IMAGE  WITH  <PROG>  IN  COLUMNS  2-6 
.  A  CARD-IMAGE  WITH  <HEADER>  IN  COLUMNS  2-33 
.  THE  FIRST  OR  ONLY  FILE  IN  <LFNPFN> ,  SHIFTED,  IF  SO 
REQUESTED 

THIS  FILE  IS  ROUTED  TO  THE  MICROFICHE  QUEUE  USING: 

.  ROUTE  ,<FILE>,DC=PR,TID=C,FID=<FID>, FC=WW. 

EXAMPLES 

1)  FILE  ABCD , ID=ZYXW  IS  A  SOURCE  FILE  TO  BE  PUT  ONTO 
FICHE  WITH  AN  EYE-READABLE  TITLE  OF 

' PROGRAM  ABCD, ID=ZYXW  05/07/80' 

OUTPUT,  WHICH  IS  TO  BE  CENTERED,  IS  TO  GO  TO  ZYXW: 

BEGIN, COMQ, , ABCD, ZYXW, 

SPROGRAM  ABCD , ID=ZYXW  05/07/80S , ZYXW , , 26 . 

2)  THE  DATA  IN  LOCAL  FILE  'INDATA'  IS  TO  BE  PUT  ONTO  FICHE 
WITH  AN  EYE-READABLE  TITLE  'DATA  A/001  05/07/80' 

OUTPUT  IS  TO  GO  TO  XXXX: 

BEGIN. COMQ, , INDATA, ,SDATA  A/001  05/07/80$ , XXXX , , 1  . 

3)  FILE  EFGH , 1 D=ZYXW  IS  A  L I  STABLE  FILE  TO  BE  PUT  ONTO 
FICHE  WITH  AN  EYE-READABLE  TITLE  OF 

'FILE  EFGH , ID=ZYXW  05/07/80' 

OUTPUT  IS  TO  GO  TO  ZYXW: 

BEGIN, COMQ, , EFGH, ZYXW, 

SFILE  EFGH , ID=ZYXW  05/07/8OS , ZYXW . 

41  THE  COMPILATION  IN  LOCAL  FILE  'OUT'  IS  TO  BE  PUT  ONTO 
FICHE  WITH  THE  EYE-READABLE  TITLE 
' PROGRAM  QRST  -•  05/07/80' 

OUTPUT  IS  TO  GO  TO  XXXX,  FRAMES  ARE  TO  BE  OUTLINED  AND 
AN  INDEX  CREATED: 

BEGIN, COMQ, , OUT , .SPROGRAM  QRST  --  05/07/80$ , XXXX , 
COMPF . 

AUTHORS 

DAVIU  V  SOMMER  -  DTNSRDC  CODE  1892.2  ICDC  PROCEDURE  COMQ) 
BARBARA  DAVIS  -  DTNSRDC  CODE  1892,1  (COM  PROCEDURES) 


DATE  WRITTEN:  05/07/80 


PROCEDURE  ' COPYBLK' 

PURPOSE 

REBLOCK  STRANGER  TAPES  TO  SCOPE  STANDARD  FILES  (BOTH 
UNBLOCKED  CARD  AND  PRINT  LINE  IMAGE  TAPES  AND  BLOCKED 
STRANGER  TAPES) 

FUNCTIONAL  CATEGORIES:  K4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, COPYBLK, , RB , MRL ,MBL , TAPE  1 , TAPE2 . REW1 ,REW2. 

DESCRIPTION  OF  PARAMETERS 

RB  -  NUMBER  OF  RECORDS  PER  BLOCK 

IF  OMITTED  OR  1  -  COPY  UNBLOCKED  STRANGER 
FILES  (CARD  AND  PRINT  LINE  IMAGES) 

OTHER  -  COPY  BLOCKED  STRANGER  FI_ES 
MRL  -  MAXIMUM  RECORD  LENGTH  (RB  NOT  EQ  1) 

(NUMBER  OF  6-BIT  CHARACTERS) 

MBL  -  MAXIMUM  BLOCK  LENGTH  (RB  NOT  EQ  1) 

(TOTAL  NUMBER  OF  CHARACTERS  PER  BLOCK  (MUST 
BE  RB  TIMES  MRL) ) 

TAPE!  -  INPUT  STRANGER  FILE  (SEE  REMARKS) 

TAPE2  -  OUTPUT  SCOPE  STANDARD  FILE 
REW1  -  OMITTED  -  REWIND  TAPE  1  AFTER  USE 

N  -  DO  NOT  REWIND  TAPE  1  AFTER  USE 

REW2  -  OMITTED  -  REWIND  TAPE2  AFTER  USE 

N  -  DO  NOT  REWIND  TAPE2  AFTER  USE 

DEFAULT  BEGIN  STATEMENT 
IF  RB  OMITTED  OR  1  : 

BEGIN, COPYBLK. .1,150, 1 50 , TAPE  1 , TAPE2 , 

IF  RB  NOT  EQ  1 : 

BEGIN, COPYBLK, . RB , 80 , * , T APE  1 . T APE2 . 

!*  -  USER  MUST  SUPPLY ! 

MAX  FL:  70000B 

REMARKS 

A  9-TRACK  TAPE  MUST  BE  COPIED  TO  DISK  BEFORE  USING  COPYBLK 

EXAMPLES 

BEGIN, COPYBLK. 

(COPY  UNBLOCKED  FILES) 

BEGIN, COPYBLK, , 1 0 , MBL  =  800  . 

(COPY  BLOCKED  CARD-IMAGE  FILES,  10  RECORDS  PER 
BLOCK.  NOTE  THAT  USER  MUST  SUPPLY  MBL.) 


05  /  0 1  -'78 
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AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 
DATE  WRITTEN:  EARLY  1975 


DATE ( S )  REVISED 

10/07/76  -  REVERT ( ABORT )  ADDED 
11/22/76  -  REW1.REW2  ADDED 
03/01/78  -  CONVERT  TO  CCL 


PROCEDURE  'COPYLIB' 


PURPOSE 

CONDENSE  (AND  SORT)  AN  EDITLIB  USER  LIBRARY  PRESERVING  AL, 

FL,  FLO  VALUES.  BINDEX  AND  LI  STB  IN  LISTS  ARE  PROVIDED. 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN .COPYLIB, , LIB , ID, OUTPUT , SORT . NOEDLST , AC . PW1 , PW2 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  PFN  OF  LIBRARY  (1-7  CHARACTERS) 

ID  -  ID  UNDER  WHICH  LIBRARY  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC  ACCESS  IDS 
OUTPUT  -  LISTABLE  OUTPUT 

SORT  -  OMITTED  OR  'SORT'  -  SORT  ROUTINE  NAMES 

(NEW  LIBRARY  MAY  BE  REORDERED  * 
ANYTHING  ELSE  -  DO  NOT  SORT 
NOEDLST  -  OMITTED  -  DO  NOT  PRINT  A  COPY  OF  EDITLIB 

OUTPUT 

ANYTHING  ELSE  -  PRINT  EDITLIB  OUTPUT 
AC  -  JOB  ORDER  NUMBER  FOR  CATALOG  OF  NEW  LIBRARY 

(MAY  BE  OMITTED) 

PW1.PW2  -  PASSWORDS  FOR  CATALOG  OF  NEW  LIBRARY 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  A6000B+ 

REMARKS 

THE  LOWEST  CYCLE  OF  LIB  IS  PURGED.  ;F  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALi;A1S  RETAINED. 

OCCASIONALLY.  EDITLIB  WILL  LOSE  m  PORTION  OF  A  DECK  DURING 
THE  COPY  PROCESS.  ?WE  DIRECTORY  WILL  SHOW  THAT  THE  DECK  IS 
THERE,  BUT  EXECUTING  IT  WILL  CAUSE  A  LOADER  ERROR.  FOR  THIS 
REASON,  THE  ' LISTBIN'  LIST  IS  PROVIDED.  A  QUICK  EXAMINATION 
OF  THIS  LIST  WILL  SHOW  ANY  TROUBLE  SPOTS.  IN  ADDITION  TO 
THE  LINES  FOR  EACH  DECK  IN  THE  LIBRARY.  THERE  SHOULD  BE  SIX 
(6)  OTHER  LINES  (PRECEDED  BY  RIGHT  BRACKET  (!>).  NORMALLY, 
THEY  ARE  AT  THE  END  OF  THE  LIBRARY,  BUT  MAY  BE  SPLIT  FOUR 
14)  AT  THE  START  AND  TWO  (2)  AT  THE  END  OF  THE  LIBRARY. 

ONE  OR  MORE  '!'  LINES  ANYWHERE  ELSE  IN  THE  LISTBIN  LISTING 
INDICATES  WHERE  THE  BAD  DECK  IS.  THE  QUICKEST  WAY  TO 
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RESTORE  THE  'MISSING'  DECK  IS  AS  FOLLOWS: 

ATTACH, MYLIB, ID=XXXX,PW= _  (GET  CURRENT  CYCLE 

Wr.ri  EXTEND  PERMISSION) 

ATTACH, LC.MYLIB, ID=XXXX,LC=1 .  (GET  LOWEST  CYCLE) 
BEGIN, UTILITY, .GETOBd.LC, ROUTINE. FILE, LIB.  (EXTRACT 

ROUTINE) 

EDITLIB. 

EXTEND, MYLIB. 

'  7/8/9  EOR 

LIBRARY (MYLIB, OLD ) 

REPLACE ( * , FILE  ) 

FINISH. 

ENDRUN. 

6/7/S/9  EOF 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  11/18/76 

DATE  I S  >  REVISED 

03/01/78  -  CONVERT  TO  CCl 


PROCEDURE  'COPYS' 


PURPOSE 

ATTACH,  EXECUTE  AND  RETURN  THE  RIQSCOPYS  PROGRAM 

FUNCTIONAL  CATEGORIES:  K1 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, COPYS, , COPY, INPUT, OUTPUT, N. 

DESCRIPTION  OF  PARAMETERS 

COPY  -  ONE  OF  I  ,E  'COPYSiCQPY'  OPTIONS 
(SEE  REMARKS) 

INPUT  -  INPUT  FILE 

OUTPUT  -  OUTPUT  FILE 

N  -  NUMBER  OF  TIMES  OR  FILES 

DEFAULT  BEGIN  STATEMENT 

BEGIN, COPYS. .COPY, INPUT, OUTPUT . 1. 

MAX  FL:  15000B 


REMARKS 

IF  RICSCOPYS  IS  ALREADY  ATTACHED  (WITH  LFN  'COPYS'), 
STILL  BE  ATTACHED  AFTER  THIS  PROCEDURE. 

A  DOCUMENT  DESCRIBING  COPYS  MAY  BE  PRINTED  BY: 

BEGIN. DOCGET, .OTHER . .COPYS. OUTPUT . 

EXAMPLE 

REWIND  AND  COPY  A  RANDOM  FILE: 

ATT ACH , RANIN .  INPUT  RANDOM  FILE 

REQUEST . RANOUT , *PF .  OUTPUT  RANDOM  FILE 
BEGIN. COPYS, .COPY  IX, RANIN, RANOUT. 

CATALOG. RANOUT . 


AUTHOR 

NORTHWESTERN  UNIVERSITY 


DATE  WRITTEN: 

DATE ( S )  REVISED 

03/01/78  -  CONVERT  TO  CCL 


0  T  ■'  2  1  ;  8 1 
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PROCEDURE  ' CV029' 

PURPOSE 

CONVERT  TO  029  PUNCH  CODE 

FUNCTIONAL  CATEGORIES:  dl  M2  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. CV029. .LFN.TID.FID. 

DESCRIPTION  OF  PARAMETERS 

LFN  -  FILE  TO  BE  CONVERTED 

TID  -  ID  OF  TERMINAL  AT  WHICH  THE  029  DECK  IS  TO  BE 
PUNCHED.  USE  '  C'  FOR  CENTRAL  SITE  OR  USE  THE 
3-CHARACTER  1700  TERMINAL  ID.  IF  OMITTED,  FILE 
' ZZZC29'  WILL  CONTAIN  THE  CONVERTED  DECK.  TO 
PUNCH.  USE 

ROUTE . ZZZ029. DC  =  PU, EC  =  80COL . T ID=  <T ID> , FID=* <F 
FID  *  IF  TID  IS  SUPPLIED.  FID  IS  THE  1-  TO  5-CHARACT 
FILE-ID  TO  3E  USED.  IF  OMITTED.  THE  JOB/INTER 
SESSION  NAME  IS  USED. 


DEFAULT  BEGIN  STATEMENT 
BEGIN. CV029.. INPUT. 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  10/17/78 


DATEiSi  REVISED 

07/25/79  -  ADD  FID  PARAMETER 


o  m 
O  X*  o 


PROCEDURE  'DISPOST' 


1 


PURPOSE  I 

INVOKE  D1SSPLA  POSTPROCESSORS  (TEK300  OR  TEK480)  ^  . 

FUNCTIONAL  CATEGORIES:  Q3  1 

COMPUTER  -1 

CDC  6000  j 

LOCATION  OF  PROCEDURE  \ 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE  | 

USAGE  | 

BEGIN. DISPOST. .WHICH. PFN. ID, PW1 ,  PW2 .  1 


PROCEDURE  'DOCADD' 


PURPOSE 

ADD  ONE  DOCUMENT  TO  A  DOCUMENTATION  FILE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE  „  n  r 

BEGIN, DOCADD, , LIB, ID. PROG. AFTER, LFN, AC, PW1 .Ptf2.PW3.PW4.Ptf5. 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  DOCUMENTATION  FILE  PFN 
{ FULL  PFN  IS  LIB  DOCUMENTATION) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC  ACCESS  ID « 

PROG  -  NAME  OF  DOCUMENT  TO  BE  ADDED 

AFTER  ■  NAME  OF  DOCUMENT  AFTER  WHICH  (HIS  DOCUMENT  IS  §u 

BE  PLACED 

I  IF  BLANK,  WILL  GO  IN  ALPHABETICAL  ORDER. 

IF  O'.  WILL  GO  AT  START  OF  FILE. 

IF  'END' .  WILL  GO  AT  END  OF  FILE.) 

LFN  -  LFN  OF  FILE  CONTAINING  NEW  DOCUMENT. 

IT  IS  REWOUND  BEFORE  BEING  READ.  IT  MUST  NOT 
CONTAIN  A  *DECK  CARD. 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

(MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  310005 


RF MARKS 

""the  LOWEST  CYCLE  OF  LIB  DOCUMENTATION  IS  PURGED,  IF 
POSSIBLE.  AT  LEAST  2  CYCLES  ARE  ALWAYS  RETAINED. 

EXAMPLES 

ASSUME  THE  OLD  DOCUMENT  FILE  WAS  CATALOGED  WITH: 

CATALOG .FILE. MYD0CUMEN7AT I  ON . ID*XXXX . XR=RONLY. 

AND  HAS  DOCUMENTS:  A.  B,  D.  F.  G.  H. 

TO  ADD  DOCUMENT  C  'ON  LFN  CC )  IN  ALPi:  ,BET  1CAL  ORDER: 

BEGIN, DOCADD. .MY.XXXX.C. .CC. .RONLY, 

THE  NEW  DOCUMENT  FILE  WILL  HAVE:  A,  B,  C.  D.  F,  G,  H. 

TO  ADD  DOCUMENT  C  (ON  LFN  CO  AT  START  OF  THE  FILE: 


THE  NEW  DOCUMENT  WILL  HAVE: 


n  rr 

v  t  W  *  * 

RONLY. 

HAVE : 

C  .  A  ,  5 ,  D .  F  ,  6 .  H . 

t  w  rr  i 

AT  THE  END  OF  THE  PILE 

END.CC 

.RONLY . 

A.  B 

.  D.  F.  G.  H.  c. 

fi£ 


TO  ADD  THE  DOCUMENT  C  (ON  LFN  CC)  AFTER  DOCUMENT  F: 

BEGIN, DOCADD, , MY, XXXX, C.F.CC, .RONLY. 

THE  NEW  DOCUMENT  FILE  WILL  HAVE:  A,  B,  D,  F,  C,  G,  H. 

SUGGESTED  COMPLETE  5EQUENCE  OF  OPERATIONS  FOR  CREATING  A 
DOCUMENT  (USING  DOC  AND  EDITOR)  AND  ADDING  IT  TO  AN  EXISTING 
DOCUMENT  FILE: 

CONNECT, OUTPUT 

ATTACH, UTILITY. 

LIBRARY. UTILITY. 

DOC.  (OR  MTDOC.  OR  PFDOC.) 

(CREATE  DOCUMENT  IN  FILE  '  DOCMNT'  ) 

EDITOR 

EDIT. DOCMNT ,SEQ 

(MODIFY.  IF  NECESSARY.  INDICATE  START  OF  EACH  PAGE 
BY  PUTTING  A  ' 1*  IN  COLUMN  1  OF  EACH  LINE  WHICH  IS  TO 
BE  THE  FIRST  LINE  OF  A  PAGE.) 

SAVE , NEWDOC , NOSEQ 

LINER  NEWDOC 

< W i L L  COUNT  PAGES  AND  LINES  PER  PAGE.  IF  ANY  PAGE  HAS 
MORE  THAN  5S  LINES,  GO  BACK  AND  RESTRUCTURE  THE 
DOCUMENT . i 

BYE 

DOC IT, NEWDOC, FILE. 

(WILL  LENGTHEN  EACH  PAGE  TO  60  LINES  ADDING  THE  DATE, 
DOCUMENT  NAME  AND  PAGE  COUNTS. I 

BEG IN. DOCADD. .MY LIB, XXXX .DOCNAME . .FILE. .RONLY. 

(WILL  ADD  THE  DOCUMENT  JUST  CREATED  (ON  LFN  'FILE'  I  TO 
THE  DOCUMENT  FILE  WITH  PFN=MYL 1BDGCUMENTAT ION . 
ID=XXXX,  IN  ALPHABETICAL  ORDER  ACCORDING  TO  THE 
SPECIFIED  DOCUMENT  NAME  ' DOCNAME- .  ALPHABETICAL 
ORDER  IS  RECOMMENDED  SC  THAT  LISTS  OF  THE  CONTENTS 
WILL  BE  MORE  READABLE.) 

BEGIN . DOCL I  ST . . MY  L 1 5 . XXXX . OUT . 

(GET  A  LIST  OF  DOCUMENT  NAMES  WITH  NUMBER  OF  CARDS. 
LINES  AND  PAGES  FOR  EACH. ) 

PR06D0C . MYL I B . XXXX , DOCNAME . OUT . 

(LIST  THE  DOCUMENT  FROM  THE  DOCUMENT  FILE  TO  VERIFY  17 
WAS  ADDED  PROPERLY.) 

BANNER. END. OUT. 

(TO  KEEP  THE  SYSTEM  FROM  PRINTING  "END  OF  LIST- 
MESSAGES  ON  LAST  PAGE  OF  DOCUMENT.) 

ROUTE  OUT  OC=PR 

(print’the  l] sts* on  any  available  PRINTER.) 


author 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/01/76 


DATE (SI  REVISED 
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PROCEDURE  '  DOCDATE 


PURPOSE 

LIST  DOCUMENT  NAMES  (ON  'DECK  CARDS  I  TOGETHER  WITH  THE 
DOCUMENT  DATE  AND  PAGE  NUMBERS  (FROM  BOTTOM  LINE  OF  EACH 
PAGE! 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN , DOCDA" 


. . L I B , I D , OUTPUT . PW 1 . PW2 . PW3 , PW4 , PW5 . 


REMARKS 

NONE 

author 

DAVID  V  SOMMER  -  DTNSRDC  CODE  '.B92.2 
DATE  WRITTEN:  02/05/80 
DATE’S*  REVISED 


PROCEDURE  ' DOCDELE' 

PURPOSE 

DELETE  ONE  DOCUMENT  FROM  A  DOCUMENTATION  FILE 
FUNCTIONAL  CATEGORIES:  Q6 


LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN . DOCDELE . ,  L I B ,  ID ,  PROG .  AC .  PW 1 ,  PW2 .  PW3 ,  PW4 ,  PW5 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRS':  PART  OF  DOCUMENTATION  FILE  PEN 
(FULL  PFN  IS  L ^DOCUMENTATION! 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC  ACCESS  ID ) 

PROG  -  NAME  OF  DOCUMENT  TO  BE  DELETED 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

( MAY  BF.  OMITTED! 

PK1-PW5  *  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 


MAX  FL:  31000B 


REMARKS 

THE  LOWEST  CYCLE  OF  LIB  DOCUMENTATION  IS  PURGED.  IF 
POSSIBLE.  AT  LEAST  2  CYCLES  ARF.  ALWAYS  RETAINED. 


>.  AMPLE  S 
ASSUME 


THE  OLD  DOCUMENT  FILE  WAS  CATALOG 


lATALOG . F I LE .MYDOCUMENTAT 3  ON , ID=XXXX . 
HAS  DOCUMENTS:  A,  6.  D.  F,  G,  H. 


ED  WITH: 
XR=R0NLY. 


iu 


TM? 


DELETE  DOCUi.._NT  G: 

BEGIN. DOCDELE, .MY.XXXX.G. .RONLY. 

NEW  DOCUMENT  FILE  WILL  HAVE:  A,  B, 


D.  F 


.  H 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1832.2 
DATE  WRITTEN:  02/01/76 


is 


03/01/78  -  CONVERT  TO  CCL; 
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PROCEDURE  * DOCDOC' 

PURPOSE 

LIST  DOCUMENTATION  FOR  PROCEDURES  DOCADD.  DOCDATE,  DOCDELE, 
DOCDOC,  DOCFILE,  DOCGET ,  DOCLIST,  DOCREPL 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


BEGIN, DOCDOC, .OUTPUT .LEFT . 

:scriptioh  OF  PARAMETERS 
OUT°UT  -  LI  STABLE  OUTPUT 

LEFT  -  OMITTED  -  PRINT  LEFT- JUSTIFIED  ON  PAGE 
NON-BLANK  -  PRINT  CENTERED  ON  WIDE  PAGE 


REMARKS 

L  BANNER  PAGE  PRECEDES  “HE  LIST  AND  CONTAINS  THE  WORD 
DOCDOC'.  A  BANNER  PAGE  WITH  THE  WORD  END'  FOLLOWS  TH£ 
LIST. 

author 

DAVID  V  SOMMER  -  DTN5RDC  CODE  1892-2 

DATE  WRITTEN:  02/10/77 

DATE  «  S •  REVISED 

03/01.78  -  CONVERT  TO  CCL 


02 /n=,  i 


ADD  PROCEDURE  DOCDATE  TO  LIST 


DOCDOC  -  1  OF  1 


PROCEDURE  '  DOCFILE 


PURPOSE 

ATTACH  A  DOCUMENTATION  FILE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. DOCFILE., LFN.PFN, ID. PW1,PW2,PW3.PW4,PW5. 


DESCRIPTION  OF  PARAMETERS 

LFN  -  LOCAL  FILE  NAME  TO  BE  USED 

PFN  -  FIRST  PART  OF  PFN. 

FULL  PFN  IS  PF N_DQCUMENT AT  I ON . 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

I  DEFAULT:  SYSTEM  PUBLIC  ACCESS  ID  < 
PW1-PW5  -  PASSWORDS 


’  w  L  j 
*Jf 


DrGi N  b i A i cMiN 


mu  MEANINGFUL  DEFAULT  VALUES 
KAx  FL:  45006 


REMARK S 

”  SAME  AS:  ATTACH. LFN. PPN_DOCUMEN? AT TON, ID=* — * . PW=PW1 . PW2 . 
PW3 . PW4 . PW5 . 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892 
DATE  WRITTEN:  02/01  76 


DATE S l  REVISED 

03/01*78  -  CONVERT 


TO  CCL :  INCREASE  TO  5  PASSWORDS 


PROCEDURE  ' DOCGET' 


PURPOSE 

GET  (EXTRACT)  SPECIFIED  DOCUMENT  FROM  A  DOCUMENTATION  FILE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , DOCGET  t . LIB. ID, PROG. OUTPUT , LEFT, PW1 , PW2 ,PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  PFN 

(FULL  PFN  IS  PFN_DOCUMENTATION) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC  ACCESS  ID) 

PROG  -  NAME  OF  DOCUMENT  TO  BE  EXTRACTED 
(USE  ' ALL'  FOR  ALL  DOCUMENTS) 

OUTPUT  *  LISTABLE  OUTPUT 
LEFT  -  PRINT  CENTERING 

OMITTED  OR  'LEFT'  -  LE F T - JUST  1 F I  ED  ON  PAGE 
OTHER  -  CENTERED  ON  WIDE  PAGE 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  30000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/01/76 
DATE ( S  1  REVISED 

12/01/77  -  ADD  'LEFT'  PARAMETER 
03/01/78  -  CONVERT  TO  CCL:  ADD  5  PASSWORDS 
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PROCEDURE  'DOCLIST' 


PURPOSE 

LIST  DOCUMENT  NAMES  (ON  *DECK  CARDS)  IN  A  DOCUMENTATION  FILE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, DOCLIST . . LIB, ID .OUTPUT ,PW1 , PW2 , PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  PFN 

(FULL  PFN  IS  PFN_DOCUMENTATION) 

ID  •  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC  ACCESS  ID! 

OUTPUT  -  L I  STABLE  OUTPUT 
PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  F L :  27000B 

REMARKS 

IN  ADDITION  TO  THE  DOCUMENT  NAMES,  THE  NUMBER  OF  CARDS, 

LINES  AND  PAGES  IS  GIVEN  FOR  EACH  DOCUMENT. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/01/76 

DATE ( S )  REVISED 
04/23/76 

03/01/78  -  CONVERT  TO  CCL:  ADD  5  PASSWORDS 


PROCEDURE  ' DOCREPL' 


PURPOSE 

REPLACE  ONE  DOCUMENT  IN  A  DOCUMENTATION  FILE 
FUNCTIONAL  CATEGORIES:  06 


LOCATION  OF  PROCEDURE 

S':  STEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, DOCREPL, , LIB. ID. PROG. AFTER ,LFN. AC. PW1 , PW2. PW3.PW4 , PW5 . 


DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  DOCUMENTATION  FILE  PFN 
(FULL  PFN  IS  L I B_DOCUMENT  AT  ION ) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC  ACCESS  ID! 

PROG  -  NAME  OF  DOCUMENT  TO  BE  REPLACED 

AFTER  -  NAME  07  DOCUMENT  AFTER  WHICH  THIS  DOCUMENT  IS  TO 

BE  PLACED 

(IF  BUNK.  WILL  GO  IN  ALPHABETICAL  ORDER. 

IF  ’ O' .  WILL  GO  AT  START  OF  FILE . 

IF  ' END'  .  WILL  GO  AT  END  OF  FILE.  > 

(USED  OKI''  IF  PROG  DOES  NOT  ALREADY  EXIST  IN  THE 


DOCUMENT  FILE.  » 

LFN  *  LFN  OF  FILE  CONTAINING  NEW  DOCUMENT. 

IT  IS  REWOUND  BEFORE  BEING  READ.  IT  MUST  NOT 
CONTAIN  A  “DECK  CARD. 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

(MAY  BE  OMITTED' 

PW1-PW5  -  PASSWORDS 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  3 l 000B 


REMARKS 

‘HE  LOWEST  CYCLE  0^  L I B_DOCUMENT AT  1  ON  IS  PURGED.  IF 
POSSIBLE.  AT  LEAST  2  CYCLES  ARE  ALWAYS  RETAINED. 


EXAMPLES 

ASSUME  THE  OLD  DOCUMENT  FILE  WAS  CATALOGED  WITH: 

CATALOG, FILE , MYDOCUMENT AT  I  ON . ID  =  XXXX ,XR  =  RONLY. 

AND  HAS  DOCUMENTS:  A,  B,  D,  F,  G,  H. 

TO  REPLACE  DOCUMENT  F  (NEW  DOCUMENT  ON  LFN  FF » : 

BEGIN, DOCREPL, , MY , XX XX . F . , FF , .RONLY. 

THE  NEW  DOCUMENT  FILE  WILL  HAVE:  A,  B,  D.  F,  G.  H. 

TO  REPLACE  DOCUMENT  E  'NEW  DOCUMENT  ON  LFN  EE:: 

EEGIN, DOCREPL, .MY.XXXX.E, .EE, .RONLY. 

THE  NEW  DOCUMENT  FIlE  WILL  HAVE:  A,  B,  D.  E.  F,  G.  H. 

NOTE  THAT  SINCE  E  DID  NOT  EXIST,  REPLACE  WAS  CHANGED  TO  ADD. 
BECAUSE  THE  AFTER  PARAMETER  WAS  OMITTED.  E  WAS  ADDED 
ALPHABETICALLY . 
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AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/01/76 


DATEIS)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 
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PROCEDURE  '  DOCTAPE' 

PURPOSE 

EXTRACT  (PRINT)  ONE  OR  ALL  DOCUMENTS  FROM  A  DOCUMENT  FILE 
ON  TAPE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, DOCTAPE. , LIB, DOC, OUTPUT. LEFT. 

DESCRIPTION  OF  PARAMETERS 

LIB  -  LIBRARY  CONTAINING  PROGRAM  WHOSE  DOCUMENT  IS 
REQUESTED 

DOC  -  NAME  OF  DOCUMENT 

<  USE  'ALL'  TO  PRINT  ALL  DOCUMENTS) 

OUTPUT  -  LISTABLE  OUTPUT 

LEFT  -  OMITTED  OR  LEH  -  PRINT  AT  LEFT  OF  PAGE 

AN' THING  ELSE  -  PRINT  IN  CENTER  OF  WIDE  PAPER 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULi  VALUES 

MA>  ^L:  32000B 

REMARKS 

DOCTAPE  IS  A  BATCH-ONLY  PROCEDURE. 

THE  FOLLOWING  LIERaRIES  ARE  SUPPORTED: 

ARLNARG 
EISPACK 
FUNPACK 
IMSL 
L INPACK 
M INPACK 

MSL  (ONLY  A  FEW! 

GENERALLY,  THE  DOCUMENTS  ARE  SOME  OF  THE  COMMENT  CARDS 
EXTRACTED  FROM  THE  SOURCE  PROGRAMS. 

ERROR  MESSAGES 

DOCTAPE  REQUIRES  A  TAPE  AND  MUST  BE  RUN  IN  BATCH 
USER  TRIED  TO  USE  DOCTAPE  UNDER  INTERCOM 

EISPACK  DOCUMENTATION  NOT  READY 
SELF-EXPLANATORY 


INVALID  LIBRARY  i < L 1 B > 1 

SELF-EXPLANATORY  i SEE  REMARKS  ABOVE i 

NO  DOCUMENT  REQUESTED 
SELF-EXPLANATORY 

NO  LIBRARY  REQUESTED 
SELF-EXPLANATORY 


DOCTAPE  -  1  OF 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  09/01/77 


DATE ( S )  REVISED 

03/01/78  -  CONVERT  TO  CCL 
11/08/79  -  ADD  UNPACK 
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PROCEDURE  'GETPROD' 


PURPOSE 

GET  PRODUCTS  FILE(S)  FOR  NOS/BE  LEVELS  461,  439,  434,  420, 
414,  410,  406,  401,  380 

FUNCTIONAL  CATEGORIES:  00 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, GETPROD, , LVL , C0B0L5 , SORTMRG . 


DESCRIPTION  OF  PARAMETERS 

LVL  -  DESIRED  LEVEL  (SEE  PURPOSE  ABOVE) 

( LFN  'PROD'  WILL  CONTAIN  THE  PRODUCTS  FILE! 
C0BQL5  -  NON-BLANK  -  GET  C0B0L5  FILE  i L VL=46 1 /434 t 

(LFN  ' CBL'  WILL  CONTAIN  IT) 
SORTMRG  *  NON-BLANK  -  GET  SORT/MERGE  FILE  (LVL=46l! 

(LFN  ' S0RTL1B'  WILL  CONTAIN  IT! 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 


MAX  H:  20000B 
REMARKS 

LVL=4 14/41 0/406/ 401/380  ARE  OBTAINED  FROM  TAPE  AND  MUST 
BE  RUN  IN  BATCH  MODE. 

ERROR  MESSAGES 

GETPROD  BELOW  lVL=420  REQUIRES  A  TAPE 
AND  MUST  BE  RUN  FROM  BATCH 
SELF-EXPLANATORY 

INVALID  LEVEL  (<LVL>) 

MUST  BE  ONE  OF: 

461  439  434  420  414  410  406  401  380 
SELF-EXPLANATORY 

NO  LEVEL  REQUESTED 
MUST  BE  ONE  OF: 

461  439  434  420  414  410  406  401  380 
SELF-EXPLANATORY 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  11/30/78 
DATE i S>  REVISED 


,'30/78 
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PROCEDURE  'GRIPE' 

PURPOSE 

ALLOW  USER  TO  MAKE  GRIPES  OR  SUGGESTIONS  DIRECTLY  TO  THE 
COMPUTER. 


FUNCTIONAL  CATEGORIES:  SO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, GRIPE, .OUTPUT , PROMPT , DUMMY , INPUT . 


DESCRIPTION  OF  PARAMETERS 

OUTPUT  -  LI  STABLE  OUTPUT,  IF  USER  REQUESTS  A  COPY  OF  HIS 
COMMENTS.  TO  PRINT  AT  THE  TELETYPE.  USER  MUST 


PROMPT 


CONNECT, OUT  PUT. 
INTERACTIVE  USE  ONLY: 
IF  NO  -  ONLY  NOMINAL 
IF  CM  TIED  OR  ANYTHING 


PROMPTING  IS  PROVIDED. 
ELSE  -  FULL  PROMPTING 


DUMMY 

INPUT 


r  K u V  i  DLL)  . 

ER VED  FOR  FUTURE  USE 

CF : I _E  FROM  WHICH  GRIPE  AND  ADMINISTRATIVE 
INFORMATION  IS  TO  BE  READ. 

ERACTIvE:  IF  GRIPE  IS  TO  BE  ENTERED  DIRECTLY 
FROM  tHE  KEYEOARD.  OMIT  THIS  PARAMETER. 

IF  THE  GRIPE  WAS  PREPARED  EARLIER  'E.G..  USING 


EDFOR-'.  ENTER  THE  LFN  OF  THE  FILE  CONTAINING 
THE  GRIPE  (DC  NOT  USE  LFN  'INPUT' i. 


DEFAULT  BEGIN  STATEMENT 

BATCH  :  BEGIN. GRIPE. .OUTPUT, ..INPUT. 

INTERACTIVE:  BEGIN, GRIPE. .OUTPUT. 


MAX  FL:  360003 


REMARKS 

ALL  GRIPES  WILL  BE  READ  AND  TROUBLE  FORMS  PREPARED,  IF 
APPROPRIATE. 


DATA  CARDS  (BATCH  ONLY- 

THE  GRIPE  IS  ENTERED  IN  COLUMNS  1-70  OF  AS  MANY  CARDS  AS 
REQUIRED  (PLEASE  BE  BRIEF  * .  THIS  IS  FOLLOWED  BY  A  CARD  Wli 
'END  '  IN  COLUMNS  1-10. 

THE  LAST  CARD  HAS  ADMINISTRATIVE  INFORMATION  FOR  PREPARING 
TROUBLE  FORM.  SHOULD  ONE  BE  NECESSARY.  IT  CONTAINS: 

COL  CONTENTS 

1*20  NAME 

21-40  DTNSRDC  CODE  OR  COMPANY  NAME 
41-50  TELEPHONE 

51-54  USER  luriA.S  1  OF  THE  FORM  XXXX* 
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GRIPE 


PROCEDURE  ' LGOTREE' 


PURPOSE 

GENERATE  CROSS-REFERENCE  LISTS  AND  TREE  STRUCTURE  FROM 
BINARY  RELOCATABLE  OBJECT  PROGRAM 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN. LGOTREE, , LFN . OUTPUT , RFL . 
DESCRIPTION  OF  PARAMETERS 


LFN  -  RELOCATABLE  PROGRAM  TO  BE  PROCESSED  (DEFAULT;  LGO) 
OUTPUT  -  LI  STABLE  OUTPUT 


PROCEDURE  ' L1BPRO' 

PURPOSE 

EXECUTE  A  PROCEDURE  ON  LIBRARY  'PROCFIL'  CATALOGED  UNDER  ANY 
ID 

FUNCTIONAL  CATEGORIES:  LO  03 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, LI BPRO. , ID , PNAME , PARAMS . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  LIBRARY  IS  CATALOGED 

(PFN  MUST  BE  ' PROCFIL'  ! 

PNAME  -  PROCEDURE  NAME 

PARAMS  -  UP  TO  18  POSITIONAL  PARAMETERS  FOR  PROCEDURE 
' PNAME' 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 


REMARKS 

ANY  'LIBRARY'  STATEMENT  IN  EFFECT  WHEN  ' L1BPRO'  STARTS  IS 
CLEARED  WHEN  'LIBPRO'  FINISHES. 


SEE  ' LIBPROA'  FOR  ANY  PROCEDURE  LIBRARY. 

SEE  'ANYPROS',  ’ MYPROS'  FOR  SEQUENTIAL  PROCEDURE  FILES. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  11/01/79 


BUNBE 


PROCEDURE  '  LIBPROA' 

PURPOSE 

EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  PROCEDURE  LIBRARY 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. LI BPROA, .PFN, ID , PNAME , P ARAMS  - 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  OF  PROCEDURE  FILE 
ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED 

PNAME  -  PROCEDURE  NAME 

PARAMS  *  UP  TO  17  POSITIONAL  PARAMETERS  FOR  'PNAME' 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 


REMARKS 

ANY  'LIBRARY'  STATEMENT  IN  EFFECT  WHEN  ’ LI BPROA'  STARTS  IS 
CLEARED  WHEN  ' LIBPROA'  FINISHES. 

SEE  ' LIBPRO'  IF  THE  PFN  IS  PROCFIL'. 

SEE  ANYPROS',  ' MYPRCS'  FOR  SEQUENTIAL  PROCEDURE  FILES. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  18S2.2 
DATE  WRITTEN:  11/01/79 
DATECS1  REVISED 


1  -f  /  *  A  /7Q 

*  5  S  l  **  /  i  'z 
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PROCEDURE  ' LIBSET 1 


PURPOSE 

CREATE  SIMPLE  ABSOLUTE  USING  ONE  EDITLIB  LIBRARY 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. LIBSET 1, , LGO, ABS. LI B1.ID1. 

DESCRIPTION  OF  PARAMETERS 


LGO 

-  RELOCATABLE  PROGRAM 

ABS 

-  RESULTING 

ABSOLUTE  MODULE 

LIE1 

-  PFN  OF  EDITLIB  USER  LIBRARY 

(DEFAULT : 

NSRDC  1 

ID  1 

-  ID  UNDER 

WHICH  L IB  1  IS  CATALOGS 

(DEFAULT: 

SYSTEM  PUBLIC  ACCESS 

DEFAULT  BEGIN  STATEMENT 

BEGIN . L I ESET 1 . . LGO , ABS .NSRDC . 


MAX  FL:  DEPENDS  ON  PROGRAM  BEING  LOADED 


REMARKS 

NONE 


AUTHOR 

DAVID  V  SOMMER  -  DT NSRDC  CODE  1892.2 
DATE  WRITTEN:  03/01/75 


DATE  IS!  REVISED 

03/01  /'78  -  CONVERT  TO  CCL 


PROCEDURE  ' LIB5ET2 


PURPOSE 

CREATE  SIMPLE  ABSOLUTE  USING  TWO  EDITLIB  LIBRARIES 

FUNCTIONAL  CATEGORIES:  10  03 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN. LIBSET2. .LG0.ABS.LIB1 ,ID1 .L1B2.ID2. 


DESCRIPTION 

i  r*r\ 

LUU 

ABS 
L I B 1 

31 


L 


OF  PARAMETERS 

-  RELOCATABLE  PROGRAM 

-  RESULTING  ABSOLUTE  MODULE 

-  PFN  OF  FIRST  EDITLIB  USER  LIBRARY 
(DEFAULT:  NSRDC ) 

-  ID  UNDER  WHICH  LIB1  IS  CATALOGED 
(DEFAULT:  SYSTEM  PUBLIC  ACCESS  ID) 

-  PFN  OF  SECOND  EDITLIB  USER  LIBRARY 
(DEFAULT:  NSRDC) 

-  ID  UNDER  WHICH  LIB2  IS  CATALOGED 

t DEFAULT :  SYSTEM  PUBLIC  ACCESS  ID i 


DEFAULT  BEGIN  STATEMENT 

BEGIN. L1BSET2. .LGU. ABS. NSRDC. .NSRDC. 


KA*  Fl:  DEPENDS  ON  PROGRAM  BEING  LOADED 

REMARKS 

NONE 


AUTHOR 

DAVID  V  SOMMER  -  DT NSRDC  CODE  1892.2 


DATE  WRITTEN:  03/01/76 


DATE: Si  REVISE 
03/01/78  - 


CONVERT  TO 


PROCEDURE  ' LINES' 


PURPOSE 

SET  PRINT  FILE  TO  6  LINES  PER  INCH 


FUNCTIONAL  CATEGORIES:  J4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, L1NE6. .OUTPU". 

DESCRIPTION  OF  PARAMETER 
OUTPUT  -  LISTABLE  OUTPUT 

DEFAULT  BEGIN  STATEMENT 
BEGIN, L1NE6. .OUTPUT . 


MAY  FL:  6000B 


REMARKS 

USER  SHOULD  PRINT  THE  NEXT  LINE  AT  THE  TOP  OF  THE 

author 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  06/07/76 


DATE  I S  i  REVISED 

03/01 / 7 6  *  CONVERT  TO  CCL 
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L3NE6 


hWiUmwiIWi. 


PROCEDURE  'LINES' 

PURPOSE 

SET  PRINT  FILE  TO  8  LINES  PER  INCH 

FUNCTIONAL  CATEGORIES:  J4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, LINE8, .OUTPUT. 

DESCRIPTION  OF  PARAMETER 
OUTPUT  -  LISTABLE  OUTPUT 

DEFAULT  BEGIN  STATEMENT 
BEGIN, L1NE8, .OUTPUT . 

MAX  FL:  6000B 

REMARKS 

USlR  SHOULD  PRINT  THE  NEXT  LINE  AT  THE  TOP  OF 
AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  06/07/76 

DATE:S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


$• 


i 
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2-54 


LINE  8 


PROCEDURE  'LIST' 

PURPOSE 

LIST  A  PERMANENT  FILE 

FUNCTIONAL  CATEGORIES:  01 

COMPUTER 
CDC  6000 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, LIST, . PFN. ID. OUTPUT. B.RTN, SHI  FT , PW1 .PW2.SN. 
DESCRIPTION  OF  PARAMETERS 


PFN 

ID 

OUTPUT 

8 


SHIFT 


Ptoi , PW2 
SN 


-  PERMANENT  FILE  NAME 

-  ID  UNDER  WHICH  PFN  IS  CATALOGED 

-  LISTABLE  OUTPUT 

-  PRINT  DENSITY 

OMITTED  OR  8  -  8  LINES  PER  INCH 

OTHER  -  6  LINES  PER  INCH 

-  LISTING  PROGRAM  DESIRED 
or.il  TTl  ED  -  C0P1SF 

OTHER  -  L I  ST  2  IN  LIBRARY  'UTILITY') 

-  NUMBER  OF  COLUMNS  TO  SHIFT  PRINTOUT  (DEFAULT:  II 
IFOR  A  FILE  HAVING  CARRIAGE  CONTROL  IN  COLUMN  1  OF 

EACH  LINE,  USE  0  TO  USE  THOSE  CARRIAGE  CONTROL 
CHARACTERS' 

(SHIFT  IS  USED  ONLY  IF  RTN  IS  OMITTED) 

-  TK  AND  RD  PASSWORDS 

-  SETNAME  (DEFAULT:  STSSETI 


DEFAULT  BEGIN  STATEMENT 
LIST ,* . .OUTPUT. ,8, . 1  . 

( *  -  USER  MUST  SUPPLY) 

MAX  FL:  33000B 

REMARKS 

THIS  IS  SOMEWHAT  LIKE  THE  BURROUGHS  LIST  COMMAND  IN  THAT  IT 
WILL  ATTACH  THE  FILE  BEFORE  LISTING  IT  AND  RETURN  IT  AFTER. 

EXAMPLES 

1)  LIST  A  SEQUENTIAL  SOURCE  PROGRAM  OR  DATA  FILE  USING 
LISTZ: 

BEGIN, LIST, , SOURCE /MY PROG , XXKX . , ,Z. 

2)  LIST  A  DOCUMENT  FILE: 

BEGIN, LIST, , DOC/MYPRDG , XXXX , ,0. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  09/25/80 
DATE i S I  REVISED 

C2/25/8 1  *  GENERALIZE  AND  ADD  TO  PUBLIC  PROCEDURE  FILE 
02 '26/81  2-55  LIST  -  1  OF 
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PROCEDURE  'MANUAL' 


PURPOSE 

PRINT  ONE  COPY  OF  A  MANUAL  OR  ITS  REVISION  PAGES 

FUNCTIONAL  CATEGORIES:  01 

COMPUTER 
CDC  6000 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEG  IN, MANUAL 


.WHICH. REV, OUTPUT, PM. 


DESCRIPTION  OF  PARAMETERS 

WHICH  -  NAME  OF  DESIRED  MANUAL 
CDC  SERIES: 

CCRM  (DEFAULT) 

CCIRM 

CL  16 

BURROUGHS  SERIES: 


REV- 


OUTPUT 

PM 


CCBRM 

CC6IRM 

BLIB 


(CCRM.  CCBRM  ONLY)  ONE  OF: 
OMITTED  OR  0  -  COMPLETE  MANUAL 


LATEST 


N 


LATEST  REVISION  -PAGES  (FASTER  THAN 
SPECIFYING  THE  LATEST  REVISION 
NUMBER) 

A  SPECIFIC  REVISION  NUMBER 
IFXTRACTS  ALL  REVISIONS  FROM  THIS 


ONE  ON) 

-  (CUE.  ELI  E  ONLY)  ONE  OF: 


OMITTED 

OR  0  -  CL  1 B 

OR 

BLI5 

M 

-  CLIB/M 

OR 

BUB/M 

N 

-  CLIB/N 

OR 

BLIB/N 

P 

-  CLIB/P 

OR 

8LIB/P 

U 

-  CL1B/U 

OR 

BLIB/U 

LISTABLE 

OUTPUT 

-  OUTPUT  FORMAT.  ONE  OF: 

OMITTED  -  LEFT-JUSTIFIED.  WIDE  PAPER 
IT  -  LEFT -ADJ ,  PM  MESSAGE  GENERATED  FOR 

1-PART  NARROW  PAPER  FOR  REMOTE  BATCH 
TERMINALS 

PM  -  SAME  AS  IT 

C  -  CENTERED  ON  WIDE  PAPER 


DEFAULT  BEGIN  STATEMENT 

BEGIN. MANUAL, .CCRM. 0, OUTPUT . 


MAX  FL:  30000B 


REMARKS 

HONE 


02/26/61 
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MANUAL 


1  OF 


ERROR  MESSAGES 

CCL  PROCEDURE  'MANUAL'  VI.  2 

PM  PARAMETER  <<PM>)  INVALID  -  MUST  BE  ONE  OF: 

OMITTED  ( LEFT- AD J ,  WIDE  PAPER) 

IT  I  LEFT -AD J .  PM  MESSAGE  GENERATED  FOR 

NARROW  PAPER  ON  REMOTE  TERMINAL) 

C  tccmcncu,  ftiuc.  f'Arc.R? 

CCL  PROCEDURE  'MANUAL'  V-1  . 2 

WHICH  PARAMETER  (<WH1CH>)  INVALID  -  MUST  BE  ONE  OF r 

CCBIRM  -  COMPUTER  CENTER  BURROUGHS  INTRODUCTORY  REFERENCE 
MANUAL 

CCBRM  -  COMPUTER  CENTER  BURROUGHS  REFERENCE  MANUAL 

ELIB  -  COMPUTER  CENTER  BURROUGHS  L*I  BR  ARIES 

(REV  IS  ONE  OF:  OMITTED,  M,  N.  P.  Ui 
CCIRM  -  COMPUTER  CENTER  CDC  INTRODUCTORY  REFERENCE 
MANUAL 

CCRM  -  COMPUTER  CENTER  CDC  REFERENCE  MANUAL 

CLIB  -  COMPUTER  CENTER  CDC  LIBRARIES 

REV  IS  ONE  OF:.  OMITTED.  M.  N.  P.  U» 

EXAMPLES 

1*  TO  PRINT  THE  COMPlETE  CCRM  ON  NARROW,  UN L I  NED  PAPER  AT 
REMOTE  BATCH  TERMINAL  Oil:  * 

BEGIN .MANUAL. .CCRM. .OUT, IT 
ROUTE, CLT.DC=PR.T!D=01 1 ,FID=*. 

2 1  TO  PRINT  THE  LATEST  CCRM  REVISION  PAGES  ON  NARROW, 

UNLINED  PAPER  AT  CENTRAL  SITE: 

BEGIN .MANUAL , . CCRM. LATEST .OUT . 

ROUTE .OUT  DC=PR,TID=C.F1D=*,FC=1T. 

3 1  TO  PRINT  CCRM.  REVISION  3  ON: 

BEGIN, MANUAL, .CCRM. 3. 

4i  TO  PRINT  CCRM.  ALL  REVISIONS.  CENTERED: 

BEGIN. MANUAl. .CCRM. 1 , ,C. 

5'  TO  PRINT  BLIB/N  ON  NARROW,  UNlINED  PAPER  AT  REMOTE 
TERMINAL  Oil: 

BEGIN, MANUAL, . BL IB . N . OUT . 1 7 . 

ROUTE .OUT. DC=PR.TID=01 1 . 


AUTHOR 


SOMMER 


'NSRDC  1892.2 


WRITTEN:  08/21/79 


DATEiSi  REVISED 

12  09/80  *  'PM'  PARAMETER  EXPANDED  TO  ALLOW  CENTERING  OPTION 
01.23/8’  -  EXPAND  TO  PRINT  CCL IB-SERIES  AND  CCBLIB-SERIES 
c  REPLACES  PROCEDURES  CCLIB'  AND  'CCBUE'1 
02/26  61  -  CHANGE  CCLIB  TO  CLIB.  CCELIB  TO  BL I B 


PROCEDURE  '  MFX' 


PURPOSE 

TELL  INTERACTIVE  USER  WHICH  MAINFRAME  HE  IS  USING 

FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. MFX. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, MFX. 

MAX  FL:  6000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  MID- 1977 


DATE ( S )  REVISED 

03/01/78  -  CONVERT  TO  CCL 


PROCEDURE  ' MNSRDC' 


PURPOSE 

EXECUTE  A  PROGRAM  ON  EDI TL IB  USER  LIBRARY  'MNSRDC' 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, MNSRDC. . PROG , PARAMS . 

DESCRIPTION  OF  PARAMETERS 

PROG  -  PROGRAM  TO  BE  EXECUTED 
PARAMS  -  UP  TO  19  PARAMETERS  FOR  'PROG' 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MA'  Fl:  DEPENDS  ON  PROGRAM  BEING  EXECUTED 

REMARKS 

NONE 

author 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  07/25/77 

DATE  <  S !  REVISED 

03/01/76  -  CONVERT  TO  CCL 


PROCEDURE  ' MYPRO' 


PURPOSE 

EXECUTE  A  PROCEDURE  ON  FILE  'PROCFIL'  CATALOGED  UNDER  ANY  ID 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, MYPRO. , ID , PNAME , PARAMS . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

( PFN  MUST  BE  ' PROCFIL'  ) 

PNAME  -  PROCEDURE  NAME 

PARAMS  -  UP  TO  18  POSITIONAL  PARAMETERS  FOR  PROCEDURE 
' PNAME' 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUl  DEFAULT  VALUES 

MAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 

REMARKS 

SEE  'ANYPRD'  OR  ’ ANYPROS'  FOR  ANY  PROCEDURE  FILE. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WE r TEN:  07/21/76 


DATE : S )  REVISED 


FUNCTIONAL  CATEGORIES:  LO  03 


LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , MYPRQS , , ID, PNAME , PARAMS . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  SEQUENTIAL  PROCEDURE  FILE  IS 

cataloged  >:pfn  must  be  -procfils'  » 

PNAME  -  PROCEDURE  NAME 

PARAMS  -  UP  TO  18  POSITIONAL  PARAMETERS  FOR  PROCEDURE 
'PNAME' 


PROCEDURE  ' NOGO' 


PURPOSE 

CREATE  SIMPLE  ABSOLUTE  FROM  RELOCATABLE 

FUNCTIONAL  CATEGORIES:  LO  03 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, NOGO, .LGO, ABS. 

DESCRIPTION  OF  PARAMETERS 

LGO  -  RELOCATABLE  PROGRAM 

ABS  -  RESULTING  ABSOLUTE  MODULE 

(MAY  BE  CATALOGED) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, NOGO.. LGO. ABS. 

MAX  FL:  DEPENDS  UPON  PROGRAM  BEING  LOADED 

REMARKS 

NONE 


AUTHOR 


DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  04/21/76 

DATEfS!  REVISED 

03/01/78  -  CONVERT  TO  CCL 


. . 


PROCEDURE  'NORERUN' 


PURPOSE 

INSURE  THAT  A  BATCH  JOB  CANNOT 
TYPE-IN 


BE  RERUN  BY  OPERATOR 


FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, NORERUN. 


DEFAULT  BEGIN  STATEMENT 
BEGIN. NORERUN. 


MAX  FL:  4500B 


R"MTHIS  PROCEDURE  WILL  CATALOG  AND  PURGE  A  DUMMY  FILE. 
ERROR  MESSAGES 

SORRY  -  NORERUN  IS  FOR  BATCH  ONLY 

TRIED  TO  EXECUTE  PROCEDURE  OUTSIDE  OF  BATCH 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  05/14/7? 

DATFlSt  REVISED 

03/01/76  -  CONVERT  TO  CCL 


PROCEDURE  OAC' 


PURPOSE 

PURGE  All  CYCLES  OF  A  FILE 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN . PAC . . PFN . ID . PW 1 . PW2 . PW3 , PW4 , PW5 , SN , UV  . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID 

PW1-PW5  -  UP  TO  5  PASSWORDS 

SN  -  SETNAME  (DEFAULT:  SYSSET i 

UV  *  UNIVERSAL  PASSWORD  (FOR  USER  DEVICE  SETS! 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MA>.  FL:  -S5000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  *  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  01/27/60 
DATE  !  S 1  REVISED 

02/24/81  -  ADD  SN  AND  UV  PARAMETERS 
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PROCEDURE  ' PAHC' 


PURPOSE 

PURGE  ALL  HIGH  CYCLES  WHILE  RETAINING  LOW  CYCLE 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. PAHC, .PFN, ID.PW1 , PW2 , PW3 , PW4 , PW5 . SN , UV . 


DESCRI 

PTION 

OF  ! 

PFN 

- 

PEI 

ID 

- 

ID 

PW1 

-PW5  - 

UP 

SN 

- 

SE 

UV 

- 

u?^ 

DE 

PAUL 

t  3EGI 

N  S 

NO 

ME  AN  IN 

GFU; 

MA 

X  FL 

:  15  DC 

AR 

v  w 

)EFAULT  VALUES 


REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  01/27/60 
DATE (Si  REVISED 

02/24/81  -  ADD  SN  AND  UV  PARAMETERS 


02 '24  '61 


PAHC 


PROCEDURE  'PALC' 

PURPOSE 

PURGE  ALL  LOW  CYCLES  WHILE  RETAINING  HIGH  CYCLE 

FUNCTIONAL  CATEGORIES:  04 

LOCATION  OF  PRQCEi-^E 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PALC,, PFN, ID. PW1,PW2,PW3,PW4,PW5.SN,UV. 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID 

PW1-PW5  -  UP  TO  5  PASSWORDS 

SN  -  SETNAME  {DEFAULT:  SYSSET 1 

UV  -  UNIVERSAL  PASSWORD  (FOR  USER  DEVICE  SETS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  150006 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WR1TTFN:  01/27/80 
DATE (SI  REVISED 

02/24/81  -  ADD  SN  AND  UV  PARAMETERS 
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PROCEDURE  '  PFRSTOR' 

PURPOSE 

CREATE  A  FILE  OF  DIRECTIVES  TO  RESTORE  PERMANENT  FILES 

FUNCTIONAL  CATEGORIES:  Q4 

COMPUTER 
CDC  6000 

LOCATION  OF  PROCEDURE 

PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PFRSTOR. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, PFRSTOR . 

MAX  FL: 

REMARKS 

THIS  PROCEDURE  EXECUTES  A  PROGRAM  WHICH  WILL  PROMPT  THE 
USER  FOR  INFORMATION  NEEDED  TO  CREATE  A  FILE  OF  DIRECTIVES 
WHICH  WILL  THEN  BE  USED  BY  USER  SERVICES  TO  RESTORE 
PERMANENT  FILES  WHICH  WERE  PURGED  BECAUSE  OF  LACK  OF  USE. 

THE  FILE  CREATED  HAS  PFN=RESTORF" 1 LES  AND  IS  CATALOGED  UNDER 
THE  ID  OF  THE  PERSON  RUNNING  THE  PROCEDURE. 

THE  PROGRAM  THIS  PROCEDURE  EXECUTES  HAS  BUILT-IN  DIRECTIONS. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  04/16/80 
DATE ( S )  REVISED 


07/15/80 


PFRSTOR  - 


PROCEDURE  ' PFTRAN1' 


PURPOSE 

INVOKE  PFTRANS  TO  TRANSFER  ONE  FILE 

FUNCTIONAL  CATEGORIES:  K1 

COMPUTER 
CDC  6000 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PFTRAN1. ,PFN, ID, CY . OUTPUT. 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  OF  FILE  TO  BE  TRANSFERRED 
'REQUIRED) 

ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED 

-■REQUIRED) 

CY  -  IF  SPECIFIED  -  SINGLE  CYCLE  TO  BE  TRANSFERRED 

IF  OMITTED  -  ALL  CYCLES  ARE  TRANSFERRED 
OUTPUT  -  LI  ST  ABLE  OUTPUT  FROM  PROGRAM  PFTRANS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL: 

REMARKS 

IF  SEVERAL  FiLES  ARE  TO  BE  TRANSFERRED,  USE  PROGRAM  PFTRANS 
DIRECTLY. 

FOR  THE  DOCUMENT  DESCRIBING  PROGRAM  'PFTRANS': 

BEGIN. DOCGET. .OTHER, , PFTRANS , OUTPUT . 

OUTPUT  DESCRIPTION 

PFTRANS  LISTS  THE  DIRECTIVE. 

AUTHOR 

DAVID  V  SOMMER  -  ^NSRDC  CODE  1892.2  -  PROCEDURE  ONLY 
ROGER  YEARICK  -  DTNSRDC  CODE  1892.3  -  PROGRAM  PFTRANS 

DATE  WRITTEN:  10/12/79 

DATE  t S )  REVISED 

03/05/80  -  REMOVE  TEST  FOR  PRESENCE  OF  PF/1D 


11/04/60 
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PROCEDURE  '  PGMTAPE' 


PURPOSE 

EXTRACT  A  SOURCE  PROGRAM  FROM  TAPE 

FUNCTIONAL  CATEGORIES:  06 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PGMTAPE, , LIB , PGM , OUTF I LE , CST . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  LIBRARY  i ONE  OF:  BIMED,  NSRDC  (DEFAULT), 
SSPi 

PGM  -  PROGRAM  DESIRED 

QUTFILE  -  FILE  TO  CONTAIN  SOURCE  PROGRAM 

CST  -  TYPE  OF  FILE  DESIRED 

C  *  COMPILE  FILE  I  UPDATE , C=OUTF I LE  ) 

S  -  SOURCE  FILE  (UPDATE, S=OUTFILE) 

T  -  SOURCE  FILE  (UPDATE  T  =  OUTF I LE  ) 


DEFAULT  BEGIN  STATEMENT 

BEG  I N , PGMTAPE . , NSRDC , * . COMP i lE , C . 

(*  -  USER  MUST  SUPPLY, 

MAX  FL:  42000B 

REMARKS 

THIS  IS  A  BATCH-ONLY  PROCEDURE.  THE  JOB  CARD  MUST  SPECIFY 
MT1.  THE  PROCEDURE  WILL  SUPPLY  THE  LABEL  CARD. 

ERROR  MESSAGES 

NO  PROGRAM  REQUESTED 

PARAMETER  'PGM'  WAS  OMITTED. 

PGMTAPE  REQUIRES  A  TAPE  AND  MUST  5E  RUN  FROM  BATCH 
USER  TRIED  TO  EXECUTE  PGMTAPE  FROM  INTERCOM. 

UNKNOWN  LIBRARY  I < L I B >  » 

INDICATED  LIBRARY  NAME  IS  NOT  SUPPORTED. 

EXAMPLE 

GET  SOURCE  PROGRAM  FOR  PROGRAM  * CMPINV'  IN  LIBRARY  'NSRDC' 

JOBNAME ,MT 1 . 

CHARGE . 

BEGIN, PGMTAPE. ,, CMPINV , F 1 LE  . 

LFN  'FILE'  CONTAINS  A  COMPILE  FILE  COPY  OF  'CMPINV'. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  08/24/7? 

DATE'S)  REVISED 

03/01/78  -  CONVERT  ^0  CCL 

01/21 '81  2-69  PGMTAPE  -  1  OF 


PROCEDURE  ' PHC' 


PURPOSE 

PURGE  HIGH  CYCLE  WHILE 


RETAINING  LOW  CYCLE 


FUNCTIONAL  CATEGORIES:  Q4 


LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN , PHC , , PFN , ID , PW1 , PW2 , PW3 , PW4, PW5 , SN, UV . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NaME 

ID  -  ID 

PW1-PW5  -  PASSWORDS 

SN  -  SETNAME  (DEFAULT:  SYSSET ) 

UV  -  UNIVERSAL  PASSWORD  (FOR  USER  DEVICE  SETS) 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  150CDB 


REMARKS 

NONE 


AUTHOR 

DAVID  V  SOMMER  *  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  01/27/80 


DATE ( S )  REVISED 

02/24/61  -  ADD  SN  AND  UV  PARAMETERS 


02/24/61 
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PROCEDURE  ' PLC' 


PURPOSE 

PURGE  LOW  CYCLE  WHILE  RETAINING  HIGH  CYCLE 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. PLC. , PFN.1D.PW1 , PW2 , PW3 . PW4 , PW5 , SN , UV . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID 

PK1-PW5  -  PASSWORDS 

SN  -  SETNAME  (DEFAULT:  SYSSET I 

UV  -  UNIVERSAL  PASSWORD  ■ FOR  USER  DEVICE  SET! 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  15000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  CT/27/80 
DATE(S!  REVISED 

02/24/61  -  ADD  SN  AND  UV  PARAMETERS 
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PROCEDURE  'PM' 


PURPOSE 

CREATE  CERTAIN  PRINT  MESSAGE  (PM)  RECORDS 

FUNCTIONAL  CATEGORIES:  J4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PM, , FC, OUTPUT , PM 1 , PM2 , PM3 , PM4 , PM5 , PM6. 

DESCRIPTION  OF  PARAMETERS 
FC  -  FORMS  COD? 

OMITTED  -  PM  RESTORE  PRINTER 

IT  -  PM  1-PART  NARROW  UNLINED  PAPER 

'OTHER'  -  PM  PM1  PM2  PM3  PM4  PM5  PM6 

(USER  MAY  CREATE  A  MESSAGE  OF  UP  TO 
6  WORDS  (30  CHARACTERS  MAX) 

OUTPUT  -  LISTABLE  OUTPUT 

PM1-PM6  -  UP  TO  5  WORDS  FOR  USER- SPEC1 F 1  ED  PM  MESSAGE 
(USED  ONLY  WHEN  FC=OTHER ) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, PM, , .OUTPUT. 

MAX  FL:  6000E 

REMARKS 

BE  SURE  ' BEGIN. PM. . .OUTPUT.'  HAS  BEEN  EXECUTED  TO  RESTORE 
PRINTER  BEFORE  ROUTING  OUTPUT  TO  BE  PRINTED. 

PM  MESSAGES  ARE  IGNORED  AT  CENTRAL  SITE.  USE  FC=  ON  ROUTE 
COMMAND. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  07/30/76 

DATE ( S !  REVISED 

11/19/76  -  ADD  'OTHER'  OPTION 
03/01/78  -  CONVERT  TO  CCL 


PM 


.'78 
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PROCEDURE  ' PROADD 


PURPOSE 

ADD  ONE  PROCEDURE  TO  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN .PROADD. . ID . NEW, AC, PW1 . PW2 . PW3 . PW4 . PW5 . 
DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

(PFN  IS  '  PROCFILS'  ! 

NEW  -  FILE  CONTAINING  NEW  NAMED  PROCEDURE 
(MAY  NOT  BE  FILE  '  INPUT'  ! 

AC  -  AC  FOR  CATALOG  (MAY  BE  OMITTED! 

PW1-PW5  -  PASSWORDS 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MA>  FL :  36000E 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  REMOVED. 

THE  LOWEST  CYCLE  IS  PURGED.  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATEiS)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 
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PROCEDURE  ' PROALL 


PURPOSE 

LIST  PROCEDURE  NAMES,  PROCEDURE  HEADERS  AND  THE  PROCEDURES 
IN  A  SEQUENTIAL  PROCEDURE  FILE  (COMBINES  PRONAM.  PROHDR 
AND  PROLIST) 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PROALL . . ID , OUTPUT . LEFT , ^W1 , PW2 . PW3 , PW4 . PW5 . 
DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  THE  PROCEDURE  FILE  IS  CATALOGED 

( PFN  IS  '  PROCFILS'  > 

OUTPUT  *  L I  STABLE  OUTPUT 

LEFT  -  OMITTED  -  PRINT  LEFT  -  JUST  I F IED  ON  PAGE 
NON-BLANK  -  PRINT  CENTERED  ON  WIDE  PAGE 
PW1-PW5  -  PASSWORDS 


DEFAULT  BEGIN  STATEMENT 
NO  MEANINGFUL  DEFAULT 


JES 


MAX  FL:  36000B 
REMARKS 

A  BANNER  PAGE  PRECEDES  THE  LIST  AND  CONTAINS  THE  WORD 
' PROC* I L$'  AND  THE  SPECIFIED  ID.  A  BANNER  PAGE  WITH  THE 
WORD  'END'  FOLLOWS  THE  LIST. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  06/02/76 


DATE i S  1  REVISED 

02/10/77  -  ADD  PARAMETER  ' 
03/01/78  -  CONVERT  TO  CCL: 


LEFT' 

ADD  5  PASSWORDS 


PROCEDURE  'PRODELE' 


PURPOSE 

DELETE  ONE  PROCEDURE  FROM  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. PRODELE. , I D , PROCED . AC . PW 1 . PW2 . PW3 , PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

<  PFN  IS  ' PROCFILS'  1 
PROCED  -  PROCEDURE  TO  BE  DELETED 
AC  -  AC  FOR  CATALOG  iMAY  BE  OMITTED! 

PW1-PW5  -  PASSWORDS 


DEFAULT  BEGIN  STATEMENT 
NO  MEANINGFUL  DEFAULT 

MAX  FL :  36000B 


■JES 


REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDUR 
ARRANGED  IN  ALPHABET  I C-L  ORDER.  EACH  PROCEDURE  CDNSI 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  REMOVED. 

THE  LOWEST  CYCLE  IS  PURGED.  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATE ! S )  REVISED 

03/01/78  -  CONVERT  TO  CCL :  INCREASE  TO  5  PASSWORDS 


nc  /r  i 

I  v  ; 
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PROCEDURE  ' PRODOC' 


PURPOSE 

LIST  DOCUMENTATION  FOR  PROCEDURES  PROADD,  PROALL, 
PRODOC,  PROGET,  PROHDR.  PROLIST,  PRONAM,  PROREPL , 


PRODELE, 

PROS2R 


FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, PRODOC, .OUTPUT , LEFT . 


DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LISTABLE  OUTPUT 
LEFT  -  OMITTED  -  PRINT 
NON- BLANK  -  PRINT 


LEFT-JUSTIFIED  ON  PAGE 
CENTERED  ON  WIDE  PAGE 


DEFAULT  BEGIN  STATEMENT 
BEGIN. PRODOC. .OUTPUT. 

MAX  FL:  25000B 


REMARKS 

A  BANNER  PAGE  PRECEDES  THE  LIS 
'PRODOC'.  A  BANNER  PAGE  WITH 


T  AND  CONTAINS  THE  WORD 
THE  WORD  'END'  FOLLOWS 


THE 


LIST. 


AUTHOR 

DAVID  V  SOMMER  -  D1NSRDC  CODE  *.892.2 
DATE  WRITTEN:  06/02/76 
DATE ( S I  REVISED 

02/10/77  -  ADD  PARAMETER  'LEFT' 

03/01/78  -  CONVERT  TO  CCL ;  ADD  PR0S2R  DOCUMENT 


7  ?. 
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PROCEDURE  'PROGET' 


PURPOSE 

GET  (EXTRACT)  ONE  PROCEDURE  FROM  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PROGET, , ID , PROCED , LFN , PW1 , PW2 , PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

( PFN  IS  ' PROCFILS'  I 
PROCED  -  NAME  OF  DESIRED  PROCEDURE 
LFN  -  NAME  OF  FILE  TO  CONTAIN  'PROCED' 

PW1-PW5  -  PASSWORDS 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 


MAX  FL: 


>00£ 


REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 


AUTHOR 

DAVID  \  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  05/28/76 


DATE; S'  REVISED 

02  -'04  'll  -  ADD  PW1  AND  PW2 
03/01/78  -  CONVERT  TO  CCL ; 


INCREASE  TO  5  PASSWORDS 


PROCEDURE  ' PROHDR' 


PURPOSE 

LIST  PROCEDURE  HEADERS  IN  A  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN . PROHDR ID , OUTPUT , PW1 . PW2 . PW3 . PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 

ID  *  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

4  PFN  IS  '  PRQCFILS'  i 
OUTPUT  -  LI  STABLE  OUTPUT 
PW1-PK5  -  PASSWORDS 


T  BEGIN  STATEMENT 
MEANINGFUL  DEFAULT 


160005 


REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDUR 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONS! 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  FLAGGED  IN  THE  LIST. 


AU” HOR 

DAviD  V  SUMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 


n  '"s 
v  >5 


(S'  REVISED 
'01/78  -  CONVER' 


ADD  5- PASSWORDS 


**§#  =  jHf  =* 
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PROCEDURE  ' PRONAM' 


PURPOSE 

LIST  NAMES  OF  PROCEDURES  IN  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PRONAM, , ID. OUTPUT , FULL , PW1 , PW2 , PW3, PW4 . PW5. 
DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

( PFN  IS  ' PROCFILS'  ) 

OUTPUT  -  L 1  STABLE  OUTPUT 

FULL  -  IF  OMITTED.  A  FULL  LIST  WITH  HEADINGS  IS  PRINTED. 

IF  ANYTHING  IS  SPECIFIED,  A  QUICK,  SINGLE-COLUMN 
LIST.  WITHOUT  HEADINGS.  IS  PROVIDED.  THIS  MAY  EE 
MORE  USEFUL  AT  AN  INTERACTIVE  TERMINAL. 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000E 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  FLAGGED  IN  THE  LIST. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATE ! S )  REVISED 

03/01/78  -  CONVERT  TO  CCL:  ADD  5  PASSWORDS 
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PROCEDURE  ' PROREPL' 


PURPOSE 

REPLACE  ONE  PROCEDURE  IN  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. PROREPL, . ID . NEW , AC , PW 1 . PW2 . PW3 . PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

! PFN  IS  ' PROCFILS'  ! 

NEW  -  FILE  CONTAINING  NEW  NAMED  PROCEDURE 
(MAY  NOT  BE  FILE  ' INPUT'  ! 

AC  -  AC  FOR  CATALOG  (MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000E 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  REMOVED. 

THE  LOWEST  CYCLE  IS  PURGED,  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATE (Si  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 


PROCEDURE  ' PR0S2R' 


PURPOSE 

CONVERT  SEQUENTIAL  PROCEDURE  FILE  TO  RANDOM  EDITLIB  USER 

LIBRARY 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN .  PROS2R  .  .  I DS ,  IDR  ,  AC  ,  PW1  ,.PW2  ,  PW3 ,  PW4 ,  PW5 . 

DESCRIPTION  OF  PARAMETERS 

IDS  -  ID  UNDER  WHICH  SEQUENTIAL  FILE  'PROCF1LS'  IS 
CATALOGED 

IDR  -  ID  UNDER  WHICH  RANDOM  FILE  'PROCFIL'  IS  TO  BE 
CATALOGED 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

•MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS  FOR  RANDOM  FILE 

(WILL  HAVE  EFFECT  ONLY  IF  AT  LEAST  ONE  CYCLE  OF 
RANDOM  FILE  'PROCFIL'  EXISTS  BEFORE  PR0S2R  IS 
EXECUTED) 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 


MAX  FL: 

REMARKS 

PFN  OF  SEQUENTIAL  FILE  MUST  BE  ' PROCFILS' . 

PFN  OF  RANDOM  FILE  WILL  BE  'PROCFIL'-. 

LOWEST  CYCLE  C-F  'PROCFIL'  WILL  BE  PURGED.  IF  POSSIBLE. 
AT  LEAST  2  CYCLES  WILL  ALWAYS  BE  RETAINED. 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  03/27/78 


DATEiS-  REVISED 


B 
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PROCEDURE  ' PURGALL' 


PURPOSE 

PURGE  PERMANENT  FILES  OF  SPECIFIED  AC  AND  ID  (PUBLIC  FILES 
OR  ON  A  USER  DEVICE  SET) 

FUNCTIONAL  CATEGORIES:  Q4 

COMPUTER 
CDC  6000 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PURGALL , , JOBORDER , ID , OUTPUT . PW 1 , PW2 , PW3 . PW4 , PW5 , SN . 

DESCRIPTION  OF  PARAMETERS 

JOBORDER  -  JOB  ORDER  NUMBER  (MUST  BE  SPECIFIED) 

ID  -  ID  OF  FILES  TO  BE  PURGED  (MUST  BE  SPECIFIED) 

OUTPUT  -  LISTABLE  OUTPUT 

PW1-PW5  -  UP  TO  5  PASSWORDS  FOR  ALL  FILES  TO  BE  PURGED 
(ONLY  TK.  RD  AND  CN  PASSWORDS  ARE  REQUIRED) 

SN  -  SETNAME.  ONE  OF: 

OMITTED  -  PUBLIC  PERMANENT  FILES 
OTHER  -  SETNAME  OF  A  USER  DEVICE  SET 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  350006 

REMARKS 

1)  PROCEDURE  WILL  AUDIT  SPECIFIED  ID  AND  JOBORDER.  ALL 
THESE  FILES  WILL  BE  PURGED. 

2)  INVALID  TK,  RD.  CN  PASSWORDS  WILL  ABORT  THE  PROCEDURE. 

3!  CHARGE  ID  OR  ACCESS  NUMBER  MUST  CORRESPOND  TO  ID  AND 

AC  BEING  PURGED. 

4)  THE  USER  MUST  SUPPLY  THE  MOUNT  CARD  WHEN  PURGING  ON  A 
USER  DEVICE  SET. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
SHARON  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  03/15/79 

DATE (S)  REVISED 

06/16/80  -  ADD  SN  PARAMETER 


81 
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PROCEDURE  'PURGEN' 

PURPOSE 

GENERATE  PROCEDURE  'PUR'  TO  PURGE  SEVERAL  FILES  WITH  COMMON 
KERNEL 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 


BEGIN . PURGEN ,. KERNEL . ID . PW1 , PW2 , PW3 , PW4 , PW5 , UV , SN . 


DESCRIPTION  OF  PARAMETERS 

KERNEL  -  FIRST  N  CHARACTERS  OF  PERM  FILE  NAME 
i COULD  BE  EMPTY! 

ID  -  ID  OF  FILES  TO  BE  PURGED 

PW1-PW5  -  UF  TO  5  PASSWORDS  FOR  ALL  FILES  TO  BE  PURGED 

! ONLY  TK  AND  CN  PASSWORDS  ARE  REQUIRED) 

UV  -  UNIVERSAL  PURGE  PASSWORD  IF  REQUIRED 

SN  -  SETNAME  1  ONLY  IF  OTHER  THAN  SYSSET  I 


BEGIN  STATEMENT 
ANINGFUL  DEFAULT 


MAX  FL:  35000B 


REMARKS 

II  GENERATES  PROCEDURE  PUR  TO  BE  USED  FOR  PURGING  SEVERAL 
FILES  OF  SAME  ID  AND  PASSWORDS.  ALLOWS  COMMON  KERNEL  FOR 
START  OF  PERM  FILE  NAMES.  WILL  ATTEMPT  TO  EXECUTE  'PUR' 
ONCE  Tu  PURGE  THE  KERNEL  FILE  NAME.  LOWEST  CYCLE. 

2)  USAGE  TO  PURGE  ADDITIONAL  FILES: 

PUR . <PART  > . . 


EXAMPLE 

DESIRE  TO  PURGE  A  SET  OF  FILES  INCLUDING:  CARR1ERDATA1 , 
CARRI ERDATA2 .  CARRIERPL .  CARRIERQ5J .  CARRIERSOR,  BELONGING 
TO  USER  ' CZZZ'  WITH  PASSWORD  ’FIR'  OR  'SEC'  OR  NO  PASSWORD. 

1 )  BEGIN, PURGEN. .CARRIER. CZZZ. FIR. SEC. 

WILL  ATTEMPT  TO  PURGE  THE  KERNEL  FILE  NAMED  CARRIER. 

2)  PUR. DATA! . 

PUR, DAT A2. 

PUR . PL . 

PUR. OBJ. 

PUR.SOR.  TO  PURGE  THE  ACTUAL  FILES 

AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 
DATE  WRITTEN:  09/12/80 
DATE'S;  REVISED 

02/10/81  -  ADD  UV.  SN  PARAMETERS 
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PROCEDURE  ' RECADD1' 

PURPOSE 

ADD  ONE  OR  MORE  LOGICAL  RECORDS  TO  A  FILE 
FUNCTIONAL  CATEGORIES:  K1 


LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. RECADD 1 , . AFTER .NREC .NEW, PFN , ID . AC , PW 1 . PW2 . PW3 . PW4 . PW5 . 
DESCRIPTION  OF  PARAMETERS 

AFTER  -  RECORD  NUMBER  AFTER  WHICH  THE  NEW  RECORD  IS)  ARE  TO 
BE  ADDED 

NREC  -  NUMBER  OF  NEW  LOGICAL  RECORDS  TO  BE  ADDED 
(DEFAULT:  1) 

NEW  -  LFN  OF  FILE  CONTAINING  NEW  RECORD(S) 

PFN  -  PERMANENT  FILE  NAME 
ID  -  ID  UNDER  WHICH  FILE  IS  CATALOGED 

AC  -  JOB  ORDER  NUMBER  FOR  NEW  CATALOG 

(MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

REPLACES  PROCEDURE  RECADD. 


m 


THE  LOWEST  CYCLE  OF  FILE  IS  PURGED.  IF  POSSIBL 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTN5RDC  CODE  1892.2 


a  LEAST  2 


DATE  WRITTEN:  04/28/78 
DATE ( S)  REVISED 


p/0 1  .'76 
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PROCEDURE  '  RECDELT 


|  PURPOSE 

W  DELETE  ONE  OR  MORE  LOGICAL  RECORDS  FROM  A  FILE 

FUNCTIONAL  CATEGORIES:  K1 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RECDEL1 . .REC.NREC.PFN, ID.AC.PW1 .PW2.PW3, PW4.PW5. 
DESCRIPTION  OF  PARAMETERS 

REC  -  RECORD  NUMBER  OF  F IRST/DNLY  LOCIGAL  RECORD  TO  BE 
DELETED 

NR EC  -  NUMBER  OF  LOGICAL  RECORDS  TO  BE  DELETED 
(DEFAULT:  1) 

PFN  -  PERMANENT  FILE  NAME 
ID  -  ID  UNDER  WHICH  FILE  IS  CATALOGED 

AC  -  JOB  ORDER  NUMBER  FOR  NEW  CATALOG 

(MAY  BE  OMITTED  I 
PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

|  REMARKS 

REPLACES  PROCEDURE  RECDELE . 

THE  LOWEST  CYCLE  OF  FILE  IS  PURGED.  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1882.2 
DATE  WRITTEN:  04/28/78 
DATE (S)  REVISED 


» 

l; 

05/01/76  2-87  RECDEL1  -  1  OF  1 


PROCEDURE  'RECDOC' 

PURPOSE 

LIST  DOCUMENTATION  FOR  PROCEDURES  RECADDl,  RECDEL1,  RECDOC 
RECGET1,  RECREP1 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RECDOC, .OUTPUT, LEFT. 

DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LI  STABLE  OUTPUT 

LEFT  -  OMITTED  -  PRINT  LEFT- JUSTIFIED  ON  PAGE 
NON-BLANK  -  PRINT  CENTERED  ON  WIDE  PAGE 

DEFAULT  BEGIN  STATEMENT 
BEGIN. RECDOC. .OUTPUT, 

MA\  FL:  25000E 


REMARKS 

A  BANNER  PAGE  PRECEDES  THE  LIST  AND  CONTAINS 
'RECDOC".  A  BANNER  PAGE  WITH  THE  WORD  'END- 
LIST. 


THE  WORD 
FOLLOWS  THE 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/10/77 


DATE ($1  REVISED 

03/01/78  *  CONVERT  TO  CCL 


PROCEDURE  ' RECGET1' 

PURPOSE' 

EXTRACT  ONE  OR  MORE  LOGICAL  RECORDS  FROM  A  FILE 

FUNCTIONAL  CATEGORIES:  K1 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RECGE T 1 , , REC , NREC, PFN . ID , PW1 , PW2 , PW3 , PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 

REC  -  RECORD  NUMBER  OF  FIRST/ONLY  LOCIGAL  RECORD  TO  B 
EXTRACTED 

NREC  -  NUMBER  OF  LOGICAL  RECORDS  TO  BE  EXTRACTED 
f DEFAULT :  1 1 

PFN  -  PERMANENT  FILE  NAME 
ID  -  ID  UNDER  WHICH  FILE  IS  CATALOGED 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  200  I  OB 

REMARKS 

REPLACES  PROCEDURE  RECGE! . 

THE  EXTRACTED  RECORD? $ »  WILL  BE  ON  A  FILE  WITH  LFN  Or  R 

FOLLOWED  BY  THE  VaLUE  OF  REC  IE.G.,  BEGIN, RECGE T , ,8 . 

WILL  CREATE  FILE  R8.  THIS  FILE  MAY  BE  CATALOGED.  IT  IS  NO 
REWOUND  AT  THE  END  OF  THE  PROCEDURE. 

AUTHOR 

DAVID  V  SOMME F  -  DTNSRDC  CODE  1692.2 
DATE  WRITTEN:  04/28/78 
DATEfSI  REVISED 
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PROCEDURE  '  RECREP1' 


PURPOSE 

REPLACE  ONE  OR  MORE  LOGICAL  RECORDS  IN  A  FILE 

FUNCTIONAL  CATEGORIES:  K1 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , RECRE  P 1 , , REC . NREC , NEW , PFM , I D , AC , PW 1 , PW2 , PW3 , PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 

REC  -  RECORD  NUMBER  OF  FIRST/ONLY  LOCIGAL  RECORD  TO  BE 
REPLACED 

NREC  -  NUMBER  OF  LOGICAL  RECORDS  TO  BE  REPLACED 
(DEFAULT:  1 

NEW  -  LFN  OF  FILE  CONTAINING  HEW  RECORD (S) 

PFN  -  PERMANENT  FILE  NAME 
ID  -  ID  UNDER  WHICH  FILE  IS  CATALOGED 

AC  -  JOB  ORDER  NUMBER  FOR  NEW  CATALOG 

(MAY  BE  OMITTED) 

PiM-PWS  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  200QQB 

REMARKS 

REPLACES  PROCEDURE  RECREPL. 

THE  LOWEST  CYCLE  OF  FILE  IS  PURGED.  IF  POSSIBLE.  AT  LEAST 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  04/28/78 


PROCEDURE  ' RENAMAC' 

PURPOSE 

RENAME  AC  FIELD  ON  PERMANENT  FILES 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RENAMAC , , OLD , NEW , ID , OUTPUT . PW1 , PW2 , PW3 , PW4 . PW5 , SN 

DESCRIPTION  OF  PARAMETERS 

OLD  -  OLD  AC  l MUST  BE  SPECIFIED 

NEW  -  NEW  AC  i MUST  BE  SPECIFIED! 

ID  -  ID  OF  FILES  TO  BE  RENAMED  MUST  BE  SPECIFIED) 


OLD 

-  OLD  AC 

NEW 

-  NEW  AC 

ID 

-  ID  OF  1 

OUTPUT 

-  LI  STAB. 

PW1-PW5 

-  iip  tn  i 

<.*r  *  w  , 

1  AiJl  ¥ 

*  UlTL  * 

SN 

-  cpfwftyi 

I  ONLY  TK.  RD  AND  CN  PASSWORDS  ARE  REQUIRED I 
SE’NAME  .'DEFAULT:  SYSSETI 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

mi  FL:  350005 

REMARKS 

~  U  PROCEDURE  WILL  AUDIT  SPECIFIED  ID  AND  OLD  AC.  ALL  T 
FILES  WILL  BE  RENAMED. 

2 1  MOST  PF  ATTACH  AND  RENAME  ERRORS  WILL  NOT  BE  FATAL. 
INVALID  TK.  RD  PASSWORDS  WILL  ABORT  THE  PROCEDURE. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892,2 


DATE  WRITTEN:  0&/01/75 
DATE ( S >  REVISED 

04/18/7?  -  MODIFY  FOR  NOS/BE  SHORT  AUDIT 
OS/ 30/77  -  ADD  type  PARAMETER 
03/01/78  -  CONVERT  TO  CCL 


11/02/78 
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PROCEDURE  'RUNBAS' 


PURPOSE 

COMPILE  AND  EXECUTE  BASIC  PROGRAM  (SIMILAR  TO  EDITOR  RUN, BAS 
FOP.  USE  OUTSIDE  OF  EDITOR) 


FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN. RUNBAS,. F, OUT. 


DESCRIPTION  OF  PARAMETERS 

F  -  INPUT  SOURCE  FILE  (REWOUND  BEFORE  COMPILES 
OUT  -  LI  STABLE  OUTPUT  (NOT  REWOUND ) 

■IF  OU!=C.  NO  LIST  IS  PROVIDED.  ERROR  MESSAGES  PRINT 
AT  TERMINAL » 


BEGIN. RUNBAS. .01 
-  NO  DEFAUL’ 


*  * 


MAX  FL:  4000GB 


REMARKS 

INPUT  AND  OUTPUT  ARE  CONNECTED  BEFORE  THE  BASIC  COMPILER 
IS  CALLED. 


ERROR  MESSAGES 
NO  INPUT  FILE. 

USES  DID  HOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  r F'  ) 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  OB/25/77 


DATE*  S)  REVISED 

0* '01/78  ”  rfiNV^fi*  tn 
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PROCEDURE  '  RUNFTN' 


02/02  7 


PURPOSE 

COMPILE  AND  EXECUTE  FTN  PROGRAM  (SIMILAR  TO  EDITOR  RUN , FTN 
FOR  USE  OUTSIDE  OF  EDITOR) 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNFTN, ,F,LGO. 

DESCRIPTION  OF  PARAMETERS 

F  -  FILE  TO  BE  COMPILED 

(MUST  BE  SPECIFIED  -  AVOID  LFN  'INPUT') 

LGO  -  FILE  TO  CONTAIN  RELOCATABLE  OBJECT  MODULE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  THAT  OF  THE  CIF r  **  T  FTN  COMPILER 

REMARKS 

AFTER  COMPLETION,  INPUT  AND  OUTPUT  ARE  CONNECTED. 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPIT  FILE  ! PARAMETER  ' F'  * 


AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 
DATE  WRITTEN:  07/27/77 


DATE (Si  REVISED 

03/01/78  -  CONVERT  TO  CCL 
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PROCEDURE  ' RUNMNF' 


PURPOSE 

COMPILE  AND  EXECUTE  MNF  PROGRAM  UNDER  INTERCOM 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNMNF, ,F. 

DESCRIPTION  OF  PARAMETER 

F  -  FILE  TO  BE  COMPILED 

l MUST  BE  SPECIFIED  -  AVOID  LFN  'INPUT' ) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  53000B  MINIMUM  (NO  EFL  NEEDED' 

REMARKS 

BEFORE  USING  RUNMNF,  ATTACH  OR  CREATE  A  SOURCE  INPUT  FILE 
' F'  (NETED  OR  EDITOR  MaT  BE  USED  TO  CREATE  IT). 

'F'  IS  REWOUND  BY  THE  PROCEDURE  BEFORE  COMPILATION. 

INPUT  AND  OUTPUT  ARE  AUTOMATICALLY  CONNECTED  WHEN  EXECUTION 
BEGINS.  AFTER  COMPLETION,  INPUT  AND  OUTPUT  REMAIN 
CONNECTED. 

TO  RE-EXECUTE  PROGRAM  '  F'  ,  DO  ANOTHER  BEGIN, RUNMNF . 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  t PARAMETER  ' F'  i 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  07/29/77 

DATE ( S S  REVISED 
08/24/77 
09/24/77 

03/01/78  -  CONVERT  TO  CCL 


05/01/78 
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PROCEDURE  'RUNPAS' 


10/31/ 


PURPOSE 

COMPILE  AND  EXECUTE  PASCAL  PROGRAM  UNDER  INTERCOM 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNPAS, .F.OUT. 

DESCRIPTION  OF  PARAMETERS 

F  -  FILE  TO  BE  COMPILED 

*  MUST  BE  SPECIFIED  -  AVOID  LFN  'INPUT') 
OUT  -  FILE  TO  CONTAIN  COMPILATION  LISTING 
‘RETAINED  ONLY  IF  COMPILATION  FAILS) 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL: 

REMARKS 

BEFORE  USING  RUNPAS.  ATTACH  OR  CREATE  A  SOURCE  INPUT  FILE 
' F'  1NETED  OR  EDITOR  MAY  BE  USED  TO  CREATE  IT). 

' F'  IS  REWOUND  B)  THE  PROCEDURE  BEFORE  COMPILATION. 

TO  RE-EXECUTE  PROGRAM  '  F'  ,  TYPE  '  LGO'  . 

ERROR  MESSAGES 

FILE  <DUT>  HAS  THE  COMPILATION  LISTING 

COMPILATION  FAILED.  USE  NETED  OR  EDITOR  OR  ROUTE  TO  A 
PRINTER  TO  FIND  THE  ERRORS. 


NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  'F'l 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  1979 
DATE'S)  REVISED 
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PROCEDURE  ' RUNSEQ' 


02/24/8 


PURPOSE 

COMPILE  AND  EXECUTE  FTN.SEQ  PROGRAM  (USES  TS  OPTION! 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNSEQ, ,F,LGO. 

DESCRIPTION  OF  PARAMETERS 

F  -  FILE  TO  BE  COMPILED 

(MUST  BE  SPECIFIED  ‘  AVOID  LFN  'INPUT'! 

LGO  -  FILE  TO  CONTAIN  RELOCATABLE  OBJECT  MODULE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  THAT  OF  THE  CURRENT  FTN  COMPILER 


REMARKS 

THIS  PROCEDURE  IS  FOR  FORTRAN  SOURCE  PROGRAMS  IN  SEQUENCED 
MODE . 


FOR  TS  OPTION  FOR  STANDARD  FORMATTED  FTN  SOURCE  CODE,  USE 
'  RUNTS'  . 

AFTER  COMPLETION,  INPUT  AND  OUTPUT  ARE  CONNECTED. 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  ' F'  » 

AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  07/27/77 

DATE ( S !  REVISED 

03/01/78  -  CONVERT  TO  CCL 
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PROCEDURE  'RUNTS' 


PURPOSE 

COMPILE  AND  EXECUTE  FTN.TS  PROGRAM 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNTS, ,F,LGO. 

DESCRIPTION  OF  PARAMETERS 

F  -  FILE  TO  BE  COMPILED 

« MUST  BE  SPECIFIED  -  AVOID  LFN  'INPUT') 

LGO  -  FILE  TO  CONTAIN  RELOCATABLE  OBJECT  MODULE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  THAT  OF  THE  CURRENT  FTN  COMPILER 

REMARKS 

AFTER  COMPLETION.  INPUT  AND  OUTPUT  ARE  CONNECTED. 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  ' F' ) 


AUTHOR 

SHARON  E  GOOD  -  OTNSRDC  CODE  1892.1 
DATE  WRITTEN:  07/27/77 


DATE ( S )  REVISED 

03/01/78  -  CONVERT  TO  CCL 


PROCEDURE  ' SEGLD' 

PURPOSE 

CREATE  A  SEGLOAD  ABSOLUTE  FILE 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , SEGLD , . SEGDIR , LGO , ABS. 

DESCRIPTION  OF  PARAMETERS 

SEGDIR  -  FILE  CONTAINING  SEGLOAD  DIRECTIVES 
(REWOUND  BEFORE  USE) 

LGO  -  RELOCATABLE  OBJECT  FILE 

ABS  -  ABSOLUTE  OBJECT  FILE 

(MAY  BE  CATALOGED) 

DEFAULT  BEGIN  STATEMENT 

BEGIN. SEGLD. . SEGDIR . LGO . ABS. 

MAX  FL:  DEPENDS  UPON  PROGRAM  BEING  LOADED 

REMARKS 

NONE 

AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  01/16/76 

DATE i S 1  REVISED 

03/01/78  -  CONVERT  TO  CCL 
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PROCEDURE  'SELDUMP' 


PURPOSE 

CREATE  BACKUP  DUMP  TAPE  OF  THE  USER  PERMANENT  FILES  OF  AN 
ACCOUNT  NUMBER 

FUNCTIONAL  CATEGORIES:  Q4  K3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN,  SELDUMP .  .  AC  ,  V'SN  1 ,  VSN2 ,  VSN3  .  VSN4  ,  SN , D ,  PW . 


DESCRIPTION  OF 


AC 

-  MUST 

VSN1 

-  TAPE 

.  (6  C 

VSM2 

-  EXTE 

•  SLO 

VSN3/4 

-  SAME 

SN 

-  SET 

r» 

u 

*  TALE 

f%im  I 

-  read 

CHARGE 


PARAMETERS 

CORRESPOND  TO  ACCESS  NUMBER  ON 
DIEBOLD  OR  SLOT  NUMBER 
HARACTERS  OR  LESS) 

RNAL  STICKER  LABEL 
T  TAPES  ONLY) 

AS  VSNl/2  FOR  SECOND  TAPE 
NAME  i DEFAULT :  SYSSET 1 
DENSITY  (DEFAULT  :  HY  -7  TRK ) 
PASSWORD  (DEFAULT  :  PUBLIC  PERM  fli 
VALUE  i 


CARD 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  200006 

REMARK  ^ 

UUTPUT  IS  MINI  AUDIT  LISTING  PF  NAME.  CYCLE,  ID  FOR  EACH 
FILE  AND  VSN  OF  TAPE  ON  WHICH  IT  W AS  DUMPED. 

ERROR  MESSAGES 

•DIFFERENT  DUMP  TYPE  OR  MODE  RUNNING* 

ONLY  ONE  DUMP  PROGRAM  MAY  RUN  AT  A  TIME  AND  ANOTHER  JOB 
IS  RUNNING  ONE.  WAIT  AWHILE  AND  RE-SUBMIT  THE  JOB. 

EXAMPLE 

XXXXYYY.MT  1 .  OR  XXXXYYY  ,NT  1 _ _ 

CHARGE, XXXX.2ZZ2299999 .  <<  ACCESS  #  FOR  1234567890 

BEGIN. SELDUMP . . 1234567890. CA9999. 
e/7/8/9  EDI 


AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  EARLY  1975 

DATE ! S 5  REVISED 

03/01/78  -  CONVERT  TO  CCL 
09/23/80  -  ADD  VSN 3  AND  VSN4 
02/24/81  -  ADD  SN.  D.  PW  -  SEG 
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PROCEDURE  'SELLOAD' 

PURPOSE 

RESTORE  SELECTED  ROUTINES  FROM  A  BACKUP  DUMPF  TAPE 

FUNCTIONAL  CATEGORIES:  Q4  K4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN , SELLOAD , , VSN1 , VSN2 , V , VSN3 , VSN4 , SN , E ,D , PW. 
DESCRIPTION  OF  PARAMETERS 


VSN1 

-  TAPE  DIEBOLD  OR  SLOT  NUMBER  (FIRST  OR  ONLY  TAPE 

(6  CHARACTERS  OR  LESS) 

VSN2 

-  EXTERNAL  STICKER  LABEL  (FIRST  OR  ONLY  TAPE) 

V 

(SLOT  TAPES  ONLY) 

-  REEL  NUMBER  IN  MULTI-REEL  FILE 

(DEFAULT:  1! 

VSN3 

-  TAPE  DIEBOLD  OR  SLOT  NUMBER  (SECOND 

TAPE) 

(6  CHARACTERS  OR  LESS) 

VSN4 

-  EXTERNAL  STICKER  LABEL  (SECOND  TAPE 

) 

(SLOT  TAPES  ONLY) 

SN 

-  SET  NAME  (DEFAULTS  TO  PUBLIC  PERM  FILE  SET) 

E 

-  EDITION  NUMBER  OF  TAPE 

(DEFAULTS  TO  00  -  LEVEL  508) 

D 

-  TAPE  DENSITY  (DEFAULT:  HY  (7-TRACK. 

800  BPI ) ) 

PW 

-  EXTEND  PASSWORD 

(DEFAULTS  TO  PUBLIC  PERM  FILE  SET  VALUE) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

NONE 


DATA  CARDS 

"  ONE  CARD  PER  FILE,  CONTAINING  ONE  OF  THE  FOLLOWING: 
PFsPFNAME . ID=XXXX .CYsNN.  TO  RESTORE  CYCLE  NN 


PF=PFNAME , ID=XXXX . 
ID-XXXX . 

EXAMPLE 

XXXXYYY.MT1  ...  OR 
CHARGE , XXXX , ZZZZZ99999 . 
BEGIN, SELLOAD, .CA9999. 

'  7/8/9  EOR 

PF=PFN1 , ID=XXXX. 
PF=PFN2, ID=XXXX,CY=4. 

"  6/7/8  9  E01 


TO  RESTORE  ALL  CYCLES 
ALL  FILES  OF  USER  XXXX 


XXXXYYY , NT1 _ _ 


ALL  CYCLES 
ONLY  CYCLE  4 


81 
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PROCEDURE  'SEND' 


PURPOSE 

SEND  MESSAGES  TO  AN  INTERCOM  USER  WHO  IS  NOT  LOGGED  IN; 
LIST  MESSAGES 


FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, SEND, ,FCN,<PARAMETERS>. 


DESCRIPTION  OF  PARAMETERS 

FCN  -  ONE  OF  THE  FOLLOWING: 

A  OR  ANY  -  CHECK  FOR  ANY  MESSAGES 
C  OR  CREATE  *  CREATE  A  MAILBOX 
E  OR  EXPLAIN  -  TYPE  EXPLANATION  OF  PROCEDURE 
L  OR  LIST  -  LIST  CONTENTS  OF  MAILBOX 
S  OR  SEND  -  SEND  TO  ANOTHER  MAILBOX 


< PARAMETERS) 


(DEFAULT! 

NOT  USED  BY  FUNCTIONS  ANY. 
OPTIONAL  FOR  LIST  AND  SEND 
DESCRIPTIONS  BELOW! 


CREATE  OR  EXPLAIN 
I  SEE  FUNCTION 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  350006 


REMARKS 

IN  ORDER  TO  RECEIVE  MESSAGES,  THE  USER  MUST  HAVE  A 
PERMANENT  FILE  NAMED  'SENDFIL',  HAVING  NO  PASSWORDS. 


FUNCTIONS 

ANY 

BEGIN. SEND. .ANY. 

THIS  FUNCTION  CHECKS  .TO  SEE  IF  THERE  ARE  ANY  MESSAGES 


CREATE 

BEGIN, SEND, .CREATE. 

CREATE  A  PERMANENT  FILE  WITH  PFN  OF  'SENDFIL'. 

THIS  IS  REQUIRED  BEFORE  A  USER  CAN  RECEIVE  MESSAGES. 
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LIST 

BEGIN, SEND . , LIST .OUTPUT , 

LIST  ANY  MESSAGES  ON  FILE  'OUTPUT'  (PARAMETER  MAY  BE 
OMITTED.  IF  'OUTPUT'  IS  NOT  CONNECTED,  THE  USER  IS 
INFORMED  THAT  THE  FILE  WAS  WRITTEN. 

IN  LISTING,  IF  THE  FIRST  CHARACTER  OF  A  LINE  IS  1, 
SPACE,  0,  -  OR  +.  IT  IS  TREATED  AS  CARRIAGE  CONTROL. 
ALL  OTHER  LINES  ARE  SHIFTED  ONE  PLACE  TO  THE  RIGHT 
BEFORE  LISTING. 

AFTER  LISTING,  THE  USER  IS  ASKED  WHETHER  THE  MESSAGES 
SHOULD  BE  SCRATCHED.  THE  USER  MUST  RESPOND  Y  OR  YES 
(FOR  YES)  OR  ANYTHING  ELSE  (FOR  NO). 

SEND 

BEGIN . SEND . , SEND , TO. I NPUT . 

BEGIN. SEND. . .TO. INPUT. 

SEND  MESSAGES  TO  USER  'TO'  (4-CHARACTER  USER  ID  OR  U 
FOR  USERSERVlCi.  IF  OMITTED  OR  INVALID.  THE  USER  IS 
PROMPTED  FOR  A  4- CHARACTER  USER  ID  (MUST  START  WITH  A, 


C. 

P.  R. 

SI  OR 

US! 

USER!  . 

1  c 

THE  N 

EXT  PAR 

A  Mi 

M  if  i  i 

TH 

£  MESS 

AGES  AR 

»-  t 

i— 

PA 

RAMETE 

R  IS  61 

YEl 

or 

that 

NAME  IS 

p 

IN 

FORMAT 

ION.  A 

M 

IS 

BEING 

READ 

MESSAGES  ARE  UP  TO  BO  CHARACTERS  LONG;  THE  FIRST  OF 
WHICH  MAT  BE  USED  FOR  CARRIAGE  CONTROL. 

MESSAGES 

GENERAL 

INVALID  FUNCTION  -  MUST  BE  ONE  OF 
ANY  -  CREATE  -  EXPLAIN  -  LIST  -  SEND 

FIRST  PARAMETER  OF  EXECUTE  STATEMENT  WAS  INVALID 

FUNCTION  ANY  -  - 

SOMEONE  IS  SENDING  YOU  A  MESSAGE 

CANNOT  ACCESS  YOUR  SENDFIL  UNTIL  SENDER  COMPLETES  THE 
MESSAGE 

UNEXPECTED  RETURN  CODE  (NNNB)  FROM  ATTACH 
PLEASE  TRY  AGAIN  LATER 

IF  SAME  ERROR  OCCURS  AGAIN,  SEE  CCRM.  3-7.  AND/OR  CALI 
USER  SERVICES 

YOU  DO  NOT  HAVE  A  SENDFIL 

TO  CREATE  ONE.  USE  BEGIN, SEND, .CREATE . 

YOU  HAVE  NO  MESSAGES 

YOU  HAVE  SOME  MESSAGES 

TO  LIST  THEM.  USE  BEGIN, SEND .. L 1ST .OUTPUT . 


SEND 


FUNCTION  CREATE-- 

CT  ID=  XXXX  PFNsSENDFIL 
CT  CY=  NNN  00000000  PRUS  50000.00  /DAY 
CREATE  WAS  SUCCESSFUL 

ERROR  DURING  CATALOG 
PLEASE  TRY  AGAIN  LATER 
COULD  NOT  CATALOG 

ERROR  TRYING  TO  GET  PF  SPACE 
PLEASE  TRY  AGAIN  LATER 

COULD  NOT  GET  PERMANENT  FILE  SPACE 

YOU  ALREADY  HAVE  A  SENDFlL 

CANNOT  CREATE  A  SECOND  SENDFlL 

FUNCTION  LIST-- 

EX  ID=  XXXX  PFN=SENDF 1L 

EX  CY=  NNN  00000000  PRUS  S0000.00  /DAY 

SENDFlL  CONTENTS  WERE  SUCCESSFULLY  SCRATCHED 

MESSAGES  WRITTEN  ON  FILE  <LFN> 

OUTPUT  FILE  <LFN>  IS  NOT  CONNECTED  AND  CONTAINS 
LISTING  OF  MESSAGES. 

SHALL  I  SCRATCH  THE  MESSAGES  (Y  OR  N!  -- 
ENTER  Y  OR  YES  TO  CLEAR  THE  MESSAGES. 

ENTER  ANYTHING  ELSE  TO  RETAIN  THEM. 

SORRY  -  SOMEONE  IS  SENDING  YOU  A  MESSAGE 
plEASE  TRY  AGAIN  LATER 

CANNOT  LIST  MESSAGES  WHILE  SOMEONE  IS  SENDING  YOU  ONE 

UNEXPECTED  RETURN  CODE  1NNNB)  FROM  ATTACH 
PLEASE  TRY  AGAIN  LATER 

ERROR  WHILE  ATTACHING  YOUR  SENDFlL.  IF  IT  HAPPENS 
AGAIN.  SEE  CCRM,  3-7.  AND/OR  CALL  USER  SERVICES. 

FUNCTION  SEND-- 
CALL  AGAIN 

RESPONSE  TO  USER  ENTRY  OF  'QUIT' 

ENTER  YOUR  MESSAGES  -  END  WITH  END 

BEGIN  ENTERING  UP-TO- 80-CHARACTER  MESSAGES.  END  WITH 
SEPARATE  LINE  CONTAINING  END  AND  NO  OTHER  NON-BLANK 
CHARACTERS.  THERE  IS  NO  MORE  PROMPTING  UNTIL  END  IS 
ENCOUNTERED. 

FROM:  YOUR-USER-ID 
TO  :  TO-USER-ID 

SENDFlL  WAS  SUCCESSFULLY  ATTACHED 
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INVALID.  MUST  BE  USERSERVIC  OR  4  CHARACTERS  STARTING 
WITH  A.  C,  P,  R  OR  S. 

PLEASE  RE-ENTER  IT  (OR  'QUIT'  TO  STOP J - 
ENTER  ONE  OF  THE  FOLLOWING: 

4-CHARACTER  USER- ID  f START  WITH  A/C/P/R/SI 
USERSERVIC  COR  U  OR  USER) 

QUIT 

READING  FROM  FILE  XXXXXXX 

MESSAGES  ARE  BEING  READ  FROM  INDICATED  FILE 

SORRY  -  1  COULDN'T  SEND  YOUR  MESSAGES 
PLEASE  TRY  AGAIN  LATER 

EXTEND  OF  SENDFIL  FAILED 

SORRY.  XXXX  IN  NOT  ACCESSIBLE 

SPECIFIED  USER'S  SENDFIL  IS  BEING  USED  BY  SOMEONE  El 

SORRY.  XXXX  CANNOT  RECEIVE  MESSAGES 

SPECIFIED  USER  DOES  NOT  HAVE  A  FUE  CALLED  SENDFIL 

TO  WHOM  lA-CHARACTER  USER-  ID  -OR-  USERSERVIC f- 

USER-ID  ON  EXECUTE  CARD  WAS  OMITTED  OR  INVALID.  ENT! 
IT  HOW. 

. . .  TRUNCATED 

ONU  FIRST  80  CHARACTERS  READ.  LISTED  CHARACTERS 
IGNORED. 

YOUR  MESSAGE  HAS  BEEN  SENT 

THE  SENDFIL  WAS  SUCCESSFULLY  EXTENDED 

UT  HyR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
ATE  WRITTEN:  05/20/77 


ATEiSi  REVISED 

03/01/78  -  CONVERT  TO  CCL 


PROCEDURE  'SORT 


fS??, i?S5T^5G 1  UP  T0  5  'DISPLAY'  FIELDS  USING  'COBOL6' 
wOllm i iNu  SEQUENCE  I' FILE'  CARDS  REQUIRED) 

FUNCTIONAL  CATEGORIES;  Ml 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 
Rcr™ 


Nt*,f  °vl ;  •  I!?  •  °^T  *  OUTPUT  ,  NF ,  S 1 ,  N 1 ,  AD  1 ,  S2 .  N2 ,  AD2 .  S3 ,  N3 ,  AD3 , 


S4.N4.AD4.S5.N5. ADS. 


DESCRIPTION  OF 
IN 
OUT 

OUTPUT 


f.n » 


.  rn4 . 


PARAMETERS 

t  tint  it  f  ?  i  *• 

U I  r j  Lt 


fPiiT 

-  Own  I  w  fcf 


BE  SORTED 
Fti  F 


LISTABlE  OUTPUT  (SORT  DIRECTIVES* 

NUMBER  DF  FIELDS  TO  BE  SORTED 
STARTING  POSITION  OF  FIRST  SORT  FIELD 
NUMBER  0?  POSITIONS  IN  FIRST  SORT  FIELD 

“  « 51 S*  i  l%*3  bun  ! 

u  *  OtsCtNCjNG  SORT 
SAME  FOR  SECOND  SORT  FIELD 


S5.N5.ADS  -  SAME  FOR  FIFTH  SORT  FIELD 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 


PROCEDURE  ' SORTCZ' 


PURPOSE 

SORT  ( SORTMRG )  UP  TO  5  'DISPLAY'  FIELDS  USING  ' C0B0L6' 
COLLATING  SEQUENCE  ('FILE'  CARDS  NOT  REQUIRED) 

FUNCTIONAL  CATEGORIES:  Ml 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, SORTCZ, . IN , OUT .OUTPUT ,MRL , NF , Si . N1 , AD  1 , S2 , N2 , AD2 , 
S3.N3, AD3.S4,N4,AD4,S5,N5.AD5. 

DESCRIPTION  OF  PARAMETERS 

IN  -  INPUT  FILE  TO  BE  SORTED 

OUT  -  OUTPUT  SORTED  FILE 

OUTPUT  -  LISTABLE  OUTPUT  I  SOFT  DIRECTIVES) 

MRL  -  MAXIMUM  RECORD  LENGTH  f ROUNDED  UP  TO  MULTIPLE 

10' 

NF  -  NUMBER  OF  HELDS  TO  BE  SORTED 

SI  -  STARTING  POSITION  OF  FIRST  SORT  FIELD 

N 1  -  NUMBER  OF  POSITIONS  IN  FIRST  SORT  FIELD 

ADI  -  A  -  ASCENDING  SORT 

D  -  DESCENDING  SORT 

S2.N2.AD2  -  SAME  FQR  SECOND  SORT  FIELD 

S5 ,N5 ! AD5  -  SAME  FOR  FIFTH  SORT  FIELD 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  60000B  (USUALLY) 

REMARKS 

THIS  PROCEDURE  PROVIDES  'FILE'  CARDS  FOR  BOTH  'IN'  AND 
'OUT'.  EACH  DEFINES  BT=C,RT=Z.  MRL  IS  USER-SPECIFIED 
(DEFAULT:  MRL-90 ) 

TO  SUPPLY  'FILE'  CARDS,  USE  PROCEDURE  'SORT'. 

ERROR  MESSAGES 

TOO  MANY  FIELDS  (MAX  5) 

USER  SPECIFIED  AN  NF  GREATER  THAN  5 

EXAMPLE 

SORT  A  CARD-IMAGE  FILE  ON  COLUMNS  1-5  (ASCENDING)  AND 
41-50  (DESCENDING): 

BEGIN, SORTCZ, , INF1 LE .OUTFILE . .90.2 . 1 .5. A , 41 , 10 ,D. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/07/80 
DATE ( S i  REVISED 


(12/24  'fi  "•  2-107  SORTCZ  -  1  0 
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PROCEDURE  ' S2K260' 


PURPOSE 

ATTACH  FILES  FOR  S2000  (VERSION  2.60)  NATURAL  LANGUAGE , 
FORTRAN,  OR  COBOL  PROCEDURAL  LANGUAGE  INTERFACE. 

FUNCTIONAL  CATEGORIES:  Q3  LO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE. 

USAGE 

BEGIN, S2K260, , LANG . 


DESCRIPTION  OF  PARAMETER 

LANG  -  COB  FOR  COBOL  LANGUAGE  INTERFACE  ROUTINE 

-  FOR  FOR  FORTRAN  LANGUAGE  INTERFACE  ROUTINE 

-  OMITTED  NATURAL  LANGUAGE 

DEFAULT  BEGIN  STATEMENT 

BEGIN, S2K260.  USE  NATURAL  LANGUAGE  ONLY 

MAX  FL:  15000B 

REMARKS 

THIS  PROCEDURE  ATTACHES  THE  FILES  FOR  SYSTEM  2000 
VERSION  2.60.  DC  NOT  USE  BEFORE  READING  THE  NEWSLETTER 
FROM  MR  I  REGARDING  THE  FEATURES  AND  DIFFERENCES  IN  THIS 
VERSION  OF  SYSTEM  2000  (APRIL  19771. 


EXAMPLES 

FOR  NATURAL  LANGUAGE: 


FOR  COBOL  INTERFACE 


BEGIN, S2K260. 

S2K260 . 

BEGIN, S2K260, , COB. 

PLICOB . 

COPYR , PLILGO, LG0.2 . 

COBOL, 1=TAPE3 . 

FTN, I  =  T  APE  3 . 

COPYF, PLILGO, LGO. 
LGO . 


EXECUTE  S2K 


PRECOMPILER 


REQUIRED 

EXECUTE 


FOR  FORTRAN  INTERFACE 


BEGIN, S2K260, , FOR. 

PLIFOR . 

COPYR , PLIGO, LGO , 2 . 

FTN , I =TAPE3 . 

COPYF .PLILGO, LGO. 
LGO. 


PRECOMPILER 


EXECUTE 


AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 
BRUCE  D  BLACK  -  DTNSRDC  CODE  1892.1  (CDCi 

DATE  WRITTEN:  06/20/77 


DATE ( S )  REVISED 

03/01/78  -  CONVERT  TO  GCL 

07/10/80  -  CHANGE  SETNAME  TO  USRVLB2 

08/05/80  -  CHANGE  'PLILGO260'  TO  ' S2K260LGO' 
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PROCEDURE  'TIDBITS' 

PURPOSE 

LIST  FILE  OF  TIDBITS  (HINTS  ON  IMPROVED  COMPUTER  USAGE) 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, TIDBITS, , OUTPUT , LEFT . 

DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LISTABLE  OUTPUT 

LEFT  -  OMITTED  OR  'LEFT'  -  PRINT  ON  LEFT  SIDE  OF  PAGE 
ANYTHING  ELSE  -  PRNT  CENTERED  ON  WIDE  PAPER 

DEFAULT  BEGIN  STATEMENT 

BEGIN, TIDBITS. .OUTPUT, LEFT. 

MAX,  FL:  320005 

REMARKS 

NONE 

MESSAGES 

<OUTPUT>  HAS  TIDBITS 

INDICATES  SUCCESSFUL  COMPLETION  (LEFT-JUSTIFIED  PRINTOUT) 

<OUTPUT >  HAS  TIDBITS  (CENTERED) 

INDICATES  SUCCESSFUL  COMPLETION  (CENTERED  PRINTOUT! 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  08/01/77 

DATE ( S )  REVISED 

03/01/78  -  CONVERT  TO  CCL 


05/01/78 
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PROCEDURE  'TRANPAK' 


PURPOSE 

COPY  CONTENTS  FROM  ONE  DEVICE  SET  TO  ANOTHER'  FOR  BACKUP 

FUNCTIONAL  CATEGORIES:  K3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN , TRANPAK , , VSNF , FS , RDF , CNF , MDF , VSNT , TS , TKF , TKT . 


DESCRIPTION  OF  PARAMETERS 

VSNF  -  VSN  OF  PACK  COPIED  FROM 

FS  -  SETNAME  COPIED  FROM 

RDF  -  USER  READ  PASSWORD  INITIALIZED  ON  DUM  FILE 

CNF  -  USER  CONTROL  PASSWORD  INITIALIZED  ON  DUM  FILE 

MDF  -  USER  MODIFY  PASSWORD  INITIALIZED  ON  DUM  FILE 

VSN1  -  VSN  OF  PACK  TO  COPY  TO 


TS  -  SETNAME  TO  COPY  TO 

TKF  -  DEVICE  SET  PASSWORD  COPIED  FROM 

TKT  -  DEVICE  SET  PASSWORD  COPIED  TO 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

IF  NO  TURNKEYS.  MAY  OMIT  THE  LAST  2  PARAMETERS. 

MAX  FL: 

REMARKS 

PERFORMS  BOTH  PACK  MOUNTS  IN  PROCEDURE. 

OUTPUT  IS  A  LIST  OF  FILES  MOVED  WITH  ID  AND  CYCLE  OF  EACH 


EXAMPLE 

BEGIN. TRANPAK. . DVS299 , SG 1 PK . RDPW . CNPW. MDPW . DVS476 . SG2PK . 
AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  07/02/76 

DATF(S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 
01/18/79  -  ADD  DEVICE  SET  PASSWORDS 
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PROCEDURE  'UPDADD' 


.  ‘  c 


PURPOSE 

ADD  ONE  DECK  TO  AN  UPDATE  LIBRARY 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, UPDADD, , LIB, ID. PROG, AFTER, LFN, AC, PW1 ,PW2,C,S. 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  PFN 

(FULL  PFN  IS  L I B_PL ) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

PROG  -  DECK  NAME  OF  ROUTINE  TO  BE  ADDED 

( ' *DECK  PROG'  IS  GENERATED  AUTOMATICALLY) 

AFTER  -  DECK  NAME  IT  IS  TO  FOLLOW 

(IF  OMITTED,  NEW  DECK  GOES  AT  END  OF  LIBRARY) 

LFN  -  LFN  OF  FILE  CONTAINING  DECK  TO  BE  ADDED 
(NO  ♦DECK  CARD) 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

l MAY  BE  OMITTED* 

PW1.PW2  -  PASSWORDS 
C  -  COMPILE  FILE  (0  FOR  NONE) 

S  -  SOURCE  FILE  iO  FOR  NONE! 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

THE  LOWEST  CYCLE  OF  LJB_PL  IS  PURGED,  IF  POSSIBLE.  AT  LEAST 
2  CYCLES  ARE  ALWAYS  RETAINED. 


AUTHOR 

DAVID  V  SOMMER 


DTNSRDC  CODE  1892.2 


. . . . . . . . 


PROCEDURE  ' UPDDELE' 


PURPOSE 

DELETE  ONE  DECK  FROM  AN  UPDATE  LIBRARY 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN. UPDDELE, , L I B , ID , PROG , AC , PW 1 , PW2 , S . 


DESCRIPTION 

LIB 

ID 

PROG 


PW  1 
e; 


pw; 


CF  PARAMETERS 
FIRST  PART  OF  PFN 
(FULL  PFN  IS  L I B_PL I 
ID  UNDER  WHICH  IT  IS  CATALOGED 
DECK  NAME  OF  ROUTINE  TO  BE  DELETED 
( ' *DECK  PROG'  IS  GENERATED  AUTOMATICAL! 
JOB  ORDER  NUMBER  FOR  CATALOG 
(MAY  BE  OMITTED) 

PASSWORDS 

SOURCE  FILE  f 0  FOR  NONE1 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 


MAX  FL:  42000B 


REMARKS 

NONE 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  03/10/76 


DATE  (Si  REVISED 

03/01/78  -  CONVERT  TO  CCL 
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PROCEDURE  ' UPDDQC' 


PURPOSE 

LIST  DOCUMENTATION  FOR  PROCEDURES  UPDADD,  UPDDELE ,  UPDDOC, 
UPDGET,  UPDL1ST,  UPDREPL 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, UPDDOC. .OUTPUT, LEFT, 


DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LlSTABLE  OUTPUT 

LEFT  -  OMITTED  -  PRINT  LEFT - JUST  I F 1ED  ON  PAGE 
NON-BLANK  -  PRINT  CENTERED  ON  WIDE  PAGE 

DEFAULT  BEGIN  STATEMENT 
BEGIN, UPDDOC. .OUTPUT. 


MAX  FL:  25000B 
REMARKS 

A  BANNER  PAGE  FRECEDES  THE  LIST  AND  CONTAINS  THE  WORD 
'UPDDOC'  .  A  BANNER  PAGE  WITH  THE  WORD  'END'  FOLLOWS  THE 
LIST. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/10/77 

DATE \ S I  REVISED 

03/01/78  -  CONVERT  TO  CCL 


05/01 '78 
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PROCEDURE  ' UPDGET' 


PURPOSE 

EXTRACT  ONE  DECK  FROM  AN  UPDATE  LIBRARY  1  UPDATE ,C !  AND, 
OPTIONALLY,  ADD  EDITOR  SEQUENCING 

FUNCTIONAL  CATEGORIES:  K3  Q7 


LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, UPDGET. , LIB, ID. DECK, COMPILE, C72.E, START. INCR.PW1 ,PW2. 
DESCRIPTION  OF  PARAMETERS 


ID 

DECK 

COMPILE 


START 


PW1.PW5 


1-7  CHARACTERS:  FIRST  PART  OF  PFN 

(FULL  PFN  IS  LI B_PL I 

ID  UNDER  WHICH  IT  IS  CATALOGED 

DECK  NAME  OF  ROUTINE  TO  BE  EXTRACTED 

COMPILE  FILE  I  UPDATE , C  =  COMP I LE  > 

l WILL  CONTAIN  EXTRACTED  DECK,  UNLESS  C?2  USED! 

IF  SPECIFIED.  WILL  CONTAIN  72-COLUMN  COPY  OF  THE 
COMPILE  FILE.  THE  COMPILE  FILE  IS  NOT  AVAILABLE 
TC  THE  USER,  i 

OMITTED  -  DO  NOT  ADD  EDITOR  SEQUENCING 
ANY  WORD  STARTING  WITH  ‘  E'  -  ADD  EDITOR  SEQUENCING 
{ THIS  PARAMETER  IS  EFFECTIVE  ONLY  IF  PARAMETER 
' C72'  IS  SPECIFIED) 

FIRST  EDITOR  SEQUENCE  NUMBER  (IF  EDI <CR  SEQUENCING 
REQUESTED)  (DEFAULT:  20! 

INCREMENT  FOR  EDITOR  SEQUENCING  (DEFAULT:  10) 

NOTE:  DEFAULT  START  AND  1NCR  WILL  GIVE  10  TIMES 

THE  COMPILE  FILE  CARD  NUMBERS  IF  THE  DECK  HAS 
NO  MODIFYING  IDENTS. 

PASSWORDS 


o 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  03/10/76 
DATE ( S)  REVISED 

07/13/76  -  ADD  EDITOR  SEQUENCING  OPTION 
02/04/77  -  ADD  PASSWORDS 
03/01/78  -  CONVERT  TO  CCL 


05  01/78 


O  -  «  i  / 
d  f  !  **. 


i  OF  1 


PROCEDURE  ' UPDGETS' 


PURPOSE 

EXTRACT  ONE  DECK  FROM  AN  UPDATE  LIBRARY  (UPDATE, S)  AND, 
OPTIONALLY,  ADD  EDITOR  SEQUENCING 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, UPDGETS , , L I B , I D , DECK , SOURCE , C72 , E , START , I NCR , PW1 , PW2. 

DESCRIPTION  OF  PARAMETERS 

LIB  -  1-7  CHARACTERS:  FIRST  PART  OF  PFN 
(FULL  PFN  IS  L I B _ PL ) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

DECK  -  DECK  NAME  OF  ROUTINE  TO  BE  -EXTRACTED 
SOURCE  -  SOURCE  FILE  ( UPDATE , S=SOURCE ) 

(COMDECKS,  IF  ANY.  INCLUDED) 

\ WI LL  CONTAIN  EXTRACTED  DECK.  UNLESS  C72  USED) 

C72  -  IF  SPECIFIED.  WILL  CONTAIN  72-COLUMN  COPY  OF  THE 

COMPILE  FILE.  THE  COMPILE  FILE  IS  NOT  AVAILABLE 
TO  THE  USER.  1 

E  -  OMITTED  -  DO  NOT  ADD  EDITOR  SEQUENCING 

ANY  WORD  STARTING  WITH  '  E*  -  ADD  EDITOR  SEQUENCING 
(THIS  PARAMETER  IS  EFFECTIVE  ONLY  IF  PARAMETER 
' C72'  IS  SPECIFIED)  - 

START  -  FIRST  EDITOR  SEQUENCE  NUMBER  (IF  EDITOR  SEQUENCING 
REQUESTED!  (DEFAULT:  20 i 

I  NCR  -  INCREMENT  FOR  EDITOR  SEQUENCING  ? DEFAULT :  10) 

NOTE:  DEFAULT  START  AND  1NCR  WIL..  GIVE'  10  TIMES 

THE  COMPILE  FILE  CARD  NUMBERS  IF  THE  DECK  HAS 
NO  MODIFYING  1DENTS. 

PW1.PW2  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  05/13/77 

DATE ( S )  REVISED 

03/01/78  -  CONVERT  TO  CCL 


PROCEDURE  ' UPDGETT' 

PURPOSE 

EXTRACT  ONE  DECK  FROM  AN  UPDATE  LIBRARY  (UPDATE, T)  AND, 
OPTIONALLY,  ADD  EDITOR  SEQUENCING 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, UPDGETT,, LIB, ID, DECK, SOURCE, C72.E, START, INCR.PW1.PW2. 

DESCRIPTION  OF  PARAMETERS 

LIB  -  1-7  CHARACTERS:  FIRST  PART  OF  PFN 
(FULL  PFN  IS  L I B _ P L ) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

DECK  -  DECK  NAME  OF  ROUTINE  TO  BE  EXTRACTED 
SOURCE  -  SOURCE  FILE  ( UPDATE . T= SOURCE ! 

(NO  COMDECKS  INCLUDED! 

i  WILL  CONTAIN  EXTRACTED  DECK.  UNLESS  C72  USED  I- 
C72  -  IF  SPECIFIED.  WILL  CONTAIN  72-COLUMN  COPY  OF  THE 

COMPILE  FILE.  THE  COMPILE  FILE  IS  NOT  AVAILABLE 
TO  THE  USER.! 

E  -  OMITTED  -  DO  NOT  ADD  EDITOR  SEQUENCING 

ANY  WORD  STARTING  WITH  ' E'  -  ADD  EDPQR  SEQUENCING 
(THIS  PARAMETER  IS  EFFECTIVE  ONLY  IF  PARAMETER 
' C?2'  IS  SPECIFIED) 

START  -  FIRST  EDITOR  SEQUENCE  NUMBER  (IF  EDITOR  SEQUENCING 
REQUESTED)  (DEFAULT:  20) 

I  NCR  -  INCREMENT  FOR  EDITOR  SEQUENCING  (DEFAULT:  10) 

NOTE:  DEFAULT  START  AND  1NCR  WILL  GIVE  10  TIMES 

THE  COMPILE  FILE  CARD  NUMBERS  IF  THE  DECK  HAS 
NO  MODIFYING  I DENTS. 

PW1.PW2  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  05/13/77 

DATESS!  REVISED 

03/01/76  -  CONVERT  TO  CCL 


05/01/78 


2-116 


UPDGETT 


a 


PROCEDURE  ' UPDLIST' 


PURPOSE 

LIST  DECK/COMDECK  NAMES  IN  UPDATE  LIBRARY  WITH  COUNT  OF 
RECORDS  IN  EACH  DECK/COMDECK 

FUNCTIONAL  CATEGORIES:  01  03 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, UPDLIST. , LIB . ID .OUTPUT . 


DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  PF  PFN 

(FULL  PFN  IS  L I B_P L  > 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

OUTPUT  -  LI  STABLE  OUTPUT 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 


MAX  FL:  42000B 


REMARKS  _  _ _ _  , 

UPDATE  IS  RUN  TO  GET  A  SOURCE  FILE.  iHtN  PROGRAM  DECK  ON 
UTILITY  IS  RUN  AGAINST  THE  SOURCE  FILE.  THEREFORE,  'aNY 
IOENTS  WILL  NOT  BE  LISTED.  AS  THEY  HAVE  ALREADY  BEEN 
PROCESSED  BY  UPDATE. 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  18S2.2 

DATE  WRITTEN:  04/12/76 

DATE i S)  REVISED 
04/23/76 
05/04/76 
05/25/76 

03/01/78  -  CONVERT  TO  CCL 


PROCEDURE  ' UPDREPL' 


PURPOSE 

REPLACE  ONE  DECK  IN  AN  UPDATE  LIBRARY 

FUNCTIONAL  CATEGORIES:  K3  07 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, UPDREPL, .LIB. ID. PROG .AFTER, LFN. AC. PW1.PW2.C.S. 
DESCRIPTION  OF  PARAMETERS 


LIB 

-  FIRST  PART  OF  PFN 
i  FULL  PFN  IS  LIB  PL  1 

ID 

-  ID  UNDER  WHICH  IT  IS  CATALOGED 

PROG 

-  DECK  NAME  OF  RuJTINE  TO  BE  REPLACED 

s ' »DECK  PROG'  IS  GENERATED  AUTOMATICA 

LLY ) 

AFTER 

-  DECK  NAME  IT  IS  TO  FOLLOW 

« IF  OMITTED.  NEW  DECK  GOES  AT  END  OF 

LIBRARY 

LFN 

-  LFN  OF  FILE  CONTAINING  DECK  TO  BE  REP 
i NO  *DECK  CARDs 

LACED 

AC 

-  JOB  ORDER  NUMBER  FOR  CATALOG 
(MAY  BE  OMITTED* 

PW1 .PW2 

-  PASSWORDS 

C 

S 


COMPILE  FILE  *0  FOR  NONE? 
SOURCE  FILE  <0  FOR  NONE? 


DEFAULT  5EGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 


MAX  FL:  42000B 


remarks 

THE  LOWEST  CYCLE  OF  LJB_PL  IS  PURGED.  IF  FQSSIBLE.  AT  LEAST 
2  CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1B92.2 


DATE  WRITTEN:  03/11/76 
DATE < S )  REVISED 

05/25/76  -  DOUBLE  UPDATE  REPLACED  BY  SINGLE  UPDATE 
03/01/78  -  CONVERT  TO  CCL 


2- 


ic- 

* 


UPDRI 


ft! 

ri 


OF 


/ 

V. 


PROCEDURE  'UTILITY' 

PURPOSE 

EXECUTE  A  PROGRAM  ON  EDI TL IB  USER  LIBRARY  'UTILITY' 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN. UTILITY. . PROG.PARAMS. 

DESCRIPTION  OF  PARAMETERS 

PROG  -  PROGRAM  TO  BE  EXECUTED 
PARAMS  -  UP  TO  19  PARAMETERS  FOR  'PROG' 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  -L:  DEPENDS  ON  PROGRAM  BEING  EXECUTED 

REMARKS 

NONE 

AUTHOR 

"  DAVID  V  SOMMER  -  DTMSRDC  CODE  1692.2 

DATE  WRITTEN:  EARLY  1975 

DATEiSi  REVISED 

03/01/76  *  CONVERT  TO  CCL 


. lull . . . . . . . . . . . . 


PROCEDURE  'VENUS 


PURPOSE 

ATTACH  AND  EXECUTE  ONE  OF  THE  VENUS  RETRIEVAL  PROGRAMS 

FUNCTIONAL  CATEGORIES:  SO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, VENUS.. WHICH, INPUT, OUTPUT, SUBSET. 

DESCRIPTION  OF  PARAMETERS 

-  VENUS  PROGRAM  DESIRED 
OMITTED  -  VENUS  f SINGLE  FILE  VERSION) 

MF  -  VENUS  (MULTIPLE  FILE  VERSION) 

PL  -  VENPL  (PLOTTING  LANGUAGE  PROCESSOR 

RP  -  VENRP  (REPORT  GENERATOR  i 

-  COMMAND  INPUT  FILE 

(IF  TERMINAL.  USER  MUST  ' CONNECT . INPUT' ) 

-  LI  ST  ABLE  OUTPUT 

(IF  TERMINAL.  USER  MUST  'CONNECT .OUTPUT*) 

-  OUTPUT  FILE  FOR  THE  SUBSET  COMMAND 

DEFAULT  BEGIN  STATEMENT 

BEGIN. VENUS. . .INPUT. OUTPUT, SUBSET. 

MAX  FL:  61000B  (MF  KAY  NEED  MORE) 

REMARKS 

FOR  VENUS  PROBLEMS,  CONTACT: 

RAY  S1MANOWITH 

DTNSRDC  CODE  2731 

(301)  267-3240  i ANNAPOLIS) 

PRPHR  M=SSAGF^ 

FIRST  PARAMETER  (<WHICH>)  INVALID 
MUST  BE  ONE  OF  MF ,  PL,  RP  QR  OMITTED 
SELF-EXPLANATORY 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN.  09/20/77 


WHICH 

INPUT 

OUTPUT 

SUBSET 


DATE' S)  REVISED 

03/G1/78  -  CONVERT  TO  CCL 


PROCEDURE  '  WHATLIB' 


PURPOSE 

LIST  LIBRARIES  SPECIFIED  IN  LAST  'LIBRARY'  COMMAND 

FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC  ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, WHATLIB, .OUTPUT. 

DESCRIPTION  OF  PARAMETER 
OUTPUT  -  LISTABLE  OUTPUT 

(TO  PRINT  AT  INTERACTIVE  TERMINAL,  MUST  BE 
CONNECTED. ) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, WHATLIB. .OUTPUT. 

MAX  FL:  22000B 

REMARKS 

OF  LIMITED  USE  IN  BATCH. 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  MID- 1 975 


DATE! SI  REVISED 

03/01/78  -  CONVERT  TO  CCL 


05/01/76 


2-121 


WHATLIB 


INITIAL  DISTRIBUTION 


COPIES: 

12  DIRECTOR 

DEFENCE  DOCUMENTATION  CENTER  (TIMA) 

CAMERON  STATION 

ALEXANDRIA,  VIRGINIA  23314 


CENTER  DISTRIBUTION 


COPIES: 


1 

18/1809 

GLEISSNER,  G.  H. 

1 

1804 

AVRUNIN,  L. 

1 

1805 

CUTHILL,  E.  H. 

2 

1809,3 

HARRIS,  D. 

1 

182 

CAMARA.  A.  W. 

1 

184 

SCHOT,  d.  W. 

1 

185 

COR  IN,  T. 

1 

187 

ZUBKOFF,  M.  d. 

1 

189 

GRAY,  G.  R. 

1 

189.1 

H1BBERT ,  D. 

1 

189.2 

HAYDEN,  H.  P. 

1 

189.3 

COOPER,  A.  E. 

150 

1892.1 

STRICKLAND,  J.  D. 

20 

1892.2 

SOMMER,  D.  V. 

1 

1892.3 

MINOR,  L.  R. 

1 

1894 

SEALS,  W. 

1 

1896 

GLOVER,  A. 

1 

1896.2 

DENNIS,  L. 

1 

522 

LIBRARY,  CARDEROCK 

1 

522.2 

LIBRARY,  ANNAPOLIS 

DTNSRDC  ISSUES  THREE  TYPES  OF  REPORTS 

1.  DTNSRDC  REPORTS,  A  FORMAL  SERIES,  CONTAIN  INFORMATION  OF  PERMANENT  TECH¬ 
NICAL  VALUE.  THEY  CARRY  A  CONSECUTIVE  NUMERICAL  IDENTIFICATION  REGARDLESS  OF 
THEIR  CLASSIFICATION  OR  THE  ORIGINATING  DEPARTMENT. 

2.  DEPARTMENTAL  REPORTS,  A  SEMIFORMAL  SERIES,  CONTAIN  INFORMATION  OF  A  PRELIM¬ 
INARY,  TEMPORARY.  OR  PROPRIETARY  NATURE  OR  OF  LIMITED  INTEREST  OR  SIGNIFICANCE. 
THEY  CARRY  A  DEPARTMENTAL  ALPHANUMERICAL  IDENTIFICATION. 

3.  TECHNICAL  MEMORANDA,  AN  INFORMAL  SERIES,  CONTAIN  TECHNICAL  DOCUMENTATION 
OF  LIMITED  USE  AND  IN1EREST.  THEY  ARE  PRIMARILY  WORKING  PAPERS  INTENDED  FOR  IN¬ 
TERNAL  USE.  THEY  CARRY  AN  IDENTIFYING  NUMBER  WHICH  INDICATES  THEIR  TYPE  AND  THE 
NUMERICAL  CODE  OF  THE  ORIGINATING  DEPARTMENT.  ANY  DISTRIBUTION  OUTSIDE  DTNSRDC 
MUST  BE  APPROVED  BY  THE  HEAD  OF  THE  ORIGINATING  DEPARTMENT  ON  A  CASE-BY-CASE 
BASIS. 


